Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Макрос для защиты ячеек в Excel, защита указанных или выше расположенных от указанной ячейки таблицы
 
Добрый день
Прошу помочь с написанием макроса
Код
Private Sub Worksheet_Change(ByVal Target As Range) 
If Target.Count > 1 Then Exit Sub 
ActiveSheet.Unprotect "02Open03" Target.Locked = True 
ActiveSheet.Protect "02Open03" 
End Sub 

Этот макрос защищает измененную ячейку и блокирует лист.
А как сделать, что он защищал не измененную ячейку, а все выше расположенные ячейки от скажем VL39 включая текущую строку. И при условии, что в VL39 значение ИСТИНА которое можно установить при помощи "Флажок" (Элемента управления формы)
То есть как только в ячейке VL39 появляется значение ИСТИНА выполняется макрос по установке защиты на всех выше расположенных ячейках

Заранее благодарю.

PS: Если это не возможно или возможно но другим способом дайте знать.  
Выражение в ссылке на ячейку в документ.
 
Ссылка [='\\srv-temp\Архив\ИТОГИ\2013\02\[Рентабельность.xls]Анализ'!FJ134]
Подскажите пожалуйста возможно ли в строку адреса к ячейке изменить значение выражением 02-1, что бы получить ссылку
='\\srv-temp\Архив\ИТОГИ\2013\01\[Рентабельность.xls]Анализ'!FJ134

Для чего нужно: что бы при копировании папки для нового месяца адрес ссылки не оставался на месте... а менялся в зависимости от текущей папки.
Страницы: 1
Наверх