Now Function

[Digitborn.com]

Hello,

How to keep the date in the cell when I use "Now()" function?

Example:

I use: =IF(A38<>"";NOW();"").
When i enter something in cell A38, I have the current date entered. I save and close the workbook. Two days later I open it, and now function recalculates the date. How to keep it. I know I can catch the cell data using VBA like Rangе("A38").Value in the Worksheet_Calculate event. These seems to me not a good way to achieve the desired result. Any clean ideas?

 

[wigi]

These seems to me not a good way to achieve the desired result. Any clean ideas?

A Worksheet_Change event will do.

 

[lenze]

Both Now and Today are volatile.

Private Sub Worksheet_Change(ByVal Target as Range)
If Target.Address = "$A$38" Then Target.Offset(0,1)=Date
End Sub

OR, maybe for all of Column "A"

Private Sub Worksheet_Change(ByVal Target as Range)
If Target.Count > 1 Then Exit Sub
If Target.Column <> 1 Then Exit Sub
Cells(Target.Row,"B") = Date
End Sub

lenze

 

[Digitborn.com]

Thanks for the answers. Any ideas besides using VBA code?

 

[Smitty]

Any ideas besides using VBA code?

CTRL+: will enter a static date.

But VBA is probably the easiest option.