Добрый день и снова вопрос по защите)

[SAS888]

Мысль интересная. Только где сохранять? В каких-то ячейках - плохо. Если работа ведется на одном компьютере, то сохранять введенное значение можно в виде ключа в специально созданной ветви реестра Windows. И еще такой момент: что делать, если ошибочно было введено неверное значение?
Все, конечно, решается, но по-моему, все-таки проще при первом вводе значения (т.е. если ячейка была пуста), по событию Worksheet_Change защитить лист, оставив (если нужно) возможность делать все, кроме изменения этой ячейки. Посвященный (знающий пароль), при необходимости всегда может изменить ее значение.

[Wasily]

Сообщение от VictorM

тут такая мысль пришла
если Wasily нужно ввести дату только один раз
"повесить" это дело на, допустим, Worksheet_SelectionChange
и записать введенное значение в коде VBA. (

Если будет свободная минута может придумаете?))

[Wasily]

SAS888, VictorM по сути верно и замечательно))) а как бы это сделать, хотя бы в подробном алгоритме?)))

[VictorM]

Да вот пробовал вчера, чёт никак, знаний видать не хватает (.
А алгоритм такой:
При запуске рабочей книги ячейка с датой пустая и поэтому в ней разрешено произвести изменения, т.е. ввести значение.
Это значение записывается в коде VBA как значение этой ячейки.
В дальнейшем - если ячейка непустая, или запрет на ее редактирование или чтение записанного значения из кода.
Где-то так.

[VictorM]

Вот ЗДЕСЬ нашел следующее:

Для того, чтобы запретить изменение данных более чем в одной ячейке, разместите событие Worksheet_Change в модуле нужного рабочего листа

Private Sub Worksheet_Change(ByVal Target As Excel.Range) 
    If Target.Count > 1 Then 
       With Application 
            .EnableEvents = False 
            .Undo 
            .EnableEvents = True 
       End With 
    End If 
End Sub

правда здесь говорится более чем об одной ячейке, но это как раз то, что нужно сделать после того как в ячейке появилось значение
А вот как это все применить....? (

[SAS888]

Я так понял, что автору темы нужно как раз все разрешить, кроме изменения в конкретной ячейке. Вот что я придумал (см. вложение).
Попробуйте ввести значение в ячейку "G5". После этого, можно будет делать все, включая удаление и добавление строк и столбцов, кроме изменения данных в этой ячейке. При явном обращении к ячейке такое сделать невозможно.

[valerij]

В 7 посте все сказано, чего еще проще, эта так похоже с моим файлом, все везде запрещено, кроме такого-то диапазона, мало того, в свойсте файла все прописано:
Создан: 1 июня 2008 г.. 21:07:30
Изменен: 18 июня 2008 г.. 9:00:33
Открыт: 18 июня 2008 г.. 9:00:33

[SAS888]

valerij, это не совсем такая задача. Дело как раз в том, что нужно все разрешить, кроме одной ячейки. Когда

все везде запрещено, кроме такого-то диапазона

тогда проще.