Страницы: 1
RSS
Общий доступ к книге и защита листа
 
Добрый день.
Подскажите как решить такую проблему:
Мне необходимо, чтобы в файле часть ячеек была недоступна для изменения пользователем, но менялась при помощи макроса. Достигаю этого при помощи кода

Private Sub Workbook_Open()
   Sheets(1).Protect Password:="*******", DrawingObjects:=False, Contents:=True, Scenarios:=True, AllowFiltering:=True, UserInterfaceOnly:=True
End Sub

Работает замечательно.
Недавно возникла необходимость поместить этот файл в общую папку и сделать к нему общий доступ. И тут начались проблемы
Protect с общим доступом несовместим, но если убрать эту строчку кода, то параметр UserInterfaceOnly:=True сбрасывается после повторного открытия документа и перестают работать все макросы.

Как выйти из этого тупика?
 
Никак. Режим UserInterfaceOnly активен до закрытия книги и сразу после закрытия сбрасывается без вариантов.
Поэтому выход один - обрабатывать ввод данных в ячейки тем же VBA, запретив любое изменение в заданных ячейках(Workshhet_Change + Application.Undo)
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Но как мне тогда выводить в ячейку результат, если запретить её изменение?
Страницы: 1
Наверх