Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel не ставится/снимается защита листа из макроса / 8 сообщений из 8, страница 1 из 1
20.06.2012, 08:28
    #37845552
w3d
w3d
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
Не ставится и не снимается программно защита листа из Workbook_SheetChange.
В макросе Workbook_Open()
и Worksheets(1).Protect Password:="111", UserInterfaceOnly:=True
и Worksheets(1).Unprotect ("111")
отлично отрабатывает.
Почему такое может быть?
Офис 2003
...
Рейтинг: 0 / 0
20.06.2012, 08:42
    #37845564
Денис Б.
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
макрорекордером запиши
...
Рейтинг: 0 / 0
20.06.2012, 08:52
    #37845574
w3d
w3d
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
Пробовал - даже этот макрос не разблокирует, если его запустить
...
Рейтинг: 0 / 0
20.06.2012, 08:55
    #37845577
w3d
w3d
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
Sub Макрос3()
ActiveSheet.Unprotect ("111")
End Sub

вот так макрос отрабатывает, но в Workbook_SheetChange эта же строка не работает.
...
Рейтинг: 0 / 0
20.06.2012, 15:24
    #37846613
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
w3d,

Логично. Снимаете защиту с активного листа. А защиту Вы устанавливаете только на первый.
Процедура Workbook_SheetChange срабатывает при изменении ячейки на любом листе. А изменения не наступает, т.к. оно запрещено защитой листа. Следовательно процедура не отрабатывает. А значит защита не снимется. Может в этом проблема?

Я бы предложил вешать это на процедуру активации листа. Private Sub Workbook_SheetActivate а на событие деактивации устанавливать заново.
...
Рейтинг: 0 / 0
20.06.2012, 16:19
    #37846768
w3d
w3d
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
В Workbook_SheetChange стоит отслеживание изменения ячейки (незаблокированной) на этом самом первом листе.
По значению в ней должна бытть заблокирована или разблокирована другая ячейка - отсюди разблокировка листа предварительно, для внесения изменений.
...
Рейтинг: 0 / 0
20.06.2012, 16:20
    #37846776
w3d
w3d
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
Изменение ловится (стоит msgbox) а разблокировка не работает.
...
Рейтинг: 0 / 0
22.06.2012, 09:17
    #37849662
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Excel не ставится/снимается защита листа из макроса
w3dИзменение ловится (стоит msgbox) а разблокировка не работает.Тогда файл показывайте. Я уже написал, что защиту Вы ставите на первый по порядку лист(Worksheets(1)), а защиту снимаете с активного. Это тоже может быть причиной. Как и то, что не на всех листах пароль одинаковый.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Excel не ставится/снимается защита листа из макроса / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]