Private Sub Workbook_Open()
Worksheets(1).Protect UserInterfaceOnly:=True
Worksheets(1).EnableSelection = xlUnlockedCells
End Sub
Лист в Excel
Помогите плиз как сделать в VBA что бы на листе Excel не выделялись я чейки и было зпрещено редактировани, т.е Лист должен открываться только для просмотра. А все данные заносятся и редактируютя с формы.
1. Выделите все ячейки рабочего листа
2. В меню Формат выберите команду Ячейки и в появившемся стандартном диалоговом окне выделите закладку Защита. Установите флажок напротив Защищаемая ячейка и Скрыть формулы [по необходимости]
3. В меню Сервис выберите пункт Защита и команду Защитить лист и в диалоговом окне в поле Пароль … введите нужный пароль и нажмите кнопку OK.
Теперь для того, чтобы запретить выделять ячейки этого рабочего листа достаточно разместить в модуле ThisWorbook (ЭтаКнига) любой из двух вариантов.
Примечание : Начиная с MS Excel XP можно запретить выделять заблокированные ячейки, при установке защиты листа.
2. В меню Формат выберите команду Ячейки и в появившемся стандартном диалоговом окне выделите закладку Защита. Установите флажок напротив Защищаемая ячейка и Скрыть формулы [по необходимости]
3. В меню Сервис выберите пункт Защита и команду Защитить лист и в диалоговом окне в поле Пароль … введите нужный пароль и нажмите кнопку OK.
Теперь для того, чтобы запретить выделять ячейки этого рабочего листа достаточно разместить в модуле ThisWorbook (ЭтаКнига) любой из двух вариантов.
Код:
Код:
Private Sub Workbook_Open()
Worksheets(1).Protect UserInterfaceOnly:=True
Worksheets(1).EnableSelection = xlNoSelection
End Sub
Worksheets(1).Protect UserInterfaceOnly:=True
Worksheets(1).EnableSelection = xlNoSelection
End Sub
Примечание : Начиная с MS Excel XP можно запретить выделять заблокированные ячейки, при установке защиты листа.