изменение заблокированной ячейки макросом - Microsoft Office Excel

Slim · 03.04.2007, 03:25

на листе есть ячейки для заполнения (что-то вроде анкеты). Для редактирования открыты только поля для ввода требуемой информации. Нужно чтобы макрос мог изменять заблокированные ячейки. Тоесть ячейка должна остаться заблокированной для пользователя, но у неё должно быть разрешение на редактирование макросом.

Здесь же ещё один вопрос - как можно макросом блокировать и разблокировать ячейки на защищённом листе? (чтобы они при определённом условии всё же становились доступными для изменения пользователем)

пытался использовать следующее:

Код:

Range("D6:E6").Locked = False\True

но при выполнение ругается на то, что ячейка неизменяема

pashulka · 03.04.2007, 11:54

1. Выполните эту инструкцию один раз, например, при открытии книги, и Вы сможете программно изменять заблокированные ячейки в защищённом листе, вплоть до закрытия этой книги.

Код:

ThisWorkbook.Worksheets(1).Protect _
Password:="Ваш_пароль", UserInterfaceOnly:=True

2. Аналогично

Код:

With ThisWorkbook.Worksheets(1)
     .Protect Password:="Ваш_пароль", UserInterfaceOnly:=True
     .Range("D6:E6").Locked = False
End With

Примечание : При необходимости, можно указать и другие необязательные аргументы метода Protect. А обладатели MS Excel 97/2000 могут не указывать пароль, даже если тот был установлен.

Slim · 05.04.2007, 18:31

попробую, спасибо!

Slim · 29.04.2007, 13:19

Забыл отписаться... всё заработало отлично... спасибо

03.04.2007, 03:25	#1
Slim Пользователь Подтвердите свой е-майл Регистрация: 01.11.2006 Сообщений: 15	изменение заблокированной ячейки макросом на листе есть ячейки для заполнения (что-то вроде анкеты). Для редактирования открыты только поля для ввода требуемой информации. Нужно чтобы макрос мог изменять заблокированные ячейки. Тоесть ячейка должна остаться заблокированной для пользователя, но у неё должно быть разрешение на редактирование макросом. Здесь же ещё один вопрос - как можно макросом блокировать и разблокировать ячейки на защищённом листе? (чтобы они при определённом условии всё же становились доступными для изменения пользователем) пытался использовать следующее: Код: `Range("D6:E6").Locked = False\True` но при выполнение ругается на то, что ячейка неизменяема

03.04.2007, 11:54	#2
pashulka Форумчанин Регистрация: 03.11.2006 Сообщений: 524	1. Выполните эту инструкцию один раз, например, при открытии книги, и Вы сможете программно изменять заблокированные ячейки в защищённом листе, вплоть до закрытия этой книги. Код: `ThisWorkbook.Worksheets(1).Protect _ Password:="Ваш_пароль", UserInterfaceOnly:=True` 2. Аналогично Код: `With ThisWorkbook.Worksheets(1) .Protect Password:="Ваш_пароль", UserInterfaceOnly:=True .Range("D6:E6").Locked = False End With` Примечание : При необходимости, можно указать и другие необязательные аргументы метода Protect. А обладатели MS Excel 97/2000 могут не указывать пароль, даже если тот был установлен.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Помогите с макросом	SoFuWa	Microsoft Office Excel	7	15.08.2008 15:26
макросом дополнить название	Romuald	Microsoft Office Excel	2	22.05.2008 17:31
Как разделить число и текст в одной ячейки на две ячейки.	neboskreb	Microsoft Office Excel	2	15.04.2008 19:39

05.04.2007, 18:31	#3
Slim Пользователь Подтвердите свой е-майл Регистрация: 01.11.2006 Сообщений: 15	попробую, спасибо!

29.04.2007, 13:19	#4
Slim Пользователь Подтвердите свой е-майл Регистрация: 01.11.2006 Сообщений: 15	Забыл отписаться... всё заработало отлично... спасибо