Действие при активации ячейки

[riko782]

Здравствуйте! Возникла такая необходимость: при активации ячейки в определенном столбце в нее автоматом записывается дата в формате чч.мм.гггг. После чего, если нажать, случайно, на нее на следующий день, чтобы дата, записанная ранее, осталась. Подскажите можно ли это сделать при помощи стандартных формул?

[IgorGO]

формулами - нельзя.

[riko782]

хорошо, тогда каким образом можно?

[Hugo121]

Так ведь у Вас уже сделано!
Только подправьте, чтоб перед тем, как заносить - проверялось что там пусто.

[riko782]

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

Так ведь у Вас уже сделано!
Только подправьте, чтоб перед тем, как заносить - проверялось что там пусто.

Не понял, если честно, что у меня уже сделано?)

[Hugo121]

Ну Вы так описали, что можно понять, что проблема с случайным нажатием на следующий день
А сделать можно макросом по событию выделения ячейки.

[riko782]

Да, верно. Хотя не только на следующий день, а и на последующие...

[Hugo121]

Непонятный какой-то формат заказали...
Ну да ладно.
Сделал.

[riko782]

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

Непонятный какой-то формат заказали...
Ну да ладно.
Сделал.

Благодарю за код! С макросами ранее не был знаком, но нашел инструменты разработчика, увидел код. С форматом, конечно, прогадал... Какой в коде написать формат чтобы выводило только дату без времени?

[riko782]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 5 Then
        If Not IsDate(Target.Value) Then
            Target.NumberFormat = "hh/mm/yyyy"
            Target.Value = Now()
        End If
    End If
End Sub

Кстати, данный код работает как-то странно...