|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
28.05.2008, 20:48 | #1 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
Как защитить рабочий лист от ввода с клавиатуры, но не от действий макроса ?
МногоУважаемый Pashulka, в миру Павел, для решения этого вопроса, предлагает:
Worksheets(1).Protect UserInterfaceOnly:=True Правильно я понимаю, нужно открыть в редакторе Лист1 и просто вставить это выражение, ни чего не меняя? |
28.05.2008, 21:25 | #2 |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
Чтобы все это дело сработало, нужно его запустить.
Обычно это делается в модуле "ЭтаКнига", примерно так: Код:
Код:
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
28.05.2008, 22:42 | #3 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
Тогда, почему Здесь, так?
И еще по защите, почему, мне, надо сначала снять защиту, а потом вкл. защиту книги, тогда макрос работает, по другому, т. е. открываю книгу с вкл. защитой, макрос пишет ошибку, сделал манипуляции, все ОК! Как это сделать в автомате. Sub Макрос1() Application.Run "'44_2.xls'!UnProtectAllSheets" 'снять защиту Ctrl+ц Application.Run "'44_2.xls'!ProtectAllSheets" 'Включить защиту Ctrl+й End Sub Последний раз редактировалось valerij; 28.05.2008 в 23:12. |
28.05.2008, 23:33 | #4 | |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
С указанным Вами сайтом я знаком оччччень давно, регулярно там бываю и нахожу много познавательного.
Цитата:
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
28.05.2008, 23:41 | #5 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
|
28.05.2008, 23:42 | #6 | |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
Цитата:
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
28.05.2008, 23:50 | #7 |
Старожил
Регистрация: 12.05.2007
Сообщений: 2,339
|
Открыл файл, а он сам сначала снял защиту, потом поставил, ее
Мне защита очень нужна, а то моя бабушка может вставить данные мимо. Последний раз редактировалось valerij; 28.05.2008 в 23:59. |
28.05.2008, 23:59 | #8 | |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
Цитата:
Код:
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Запрет ввода с клавиатуры букв | Omedus | Общие вопросы Delphi | 13 | 16.05.2010 14:39 |
Фиксирование действий в файле | asale | Microsoft Office Excel | 7 | 17.08.2008 09:06 |
Как защитить программу?? | PONKA | Безопасность, Шифрование | 8 | 19.05.2008 08:16 |
защитить лист экселя от копирования | nextaty | Microsoft Office Excel | 11 | 01.12.2006 21:27 |
защитить лист | zetrix | Microsoft Office Excel | 2 | 27.11.2006 17:21 |