Adding A Date To Adjacent Cell

[FS]

I need to know if there is a simple formula to add the current (static) date
into the adjacent cell by entering a specific # into another cell.
Example: by entering 100 into cell A1, I'd like to see the date apear in
cell B1.
Thanks, FS

 

[Luke M]

You need VB. Right click on sheet tab, view code. Paste this in:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub
If Target.Value = 100 Then Target.Offset(0, 1) = Date
End Sub

 

[Gord Dibben]

There are a couple of methods to create a static date pointed out on John
McGimpsey's site.

http://www.mcgimpsey.com/excel/timestamp.html

One uses circular references and worksheet function NOW()

Other uses VBA


Gord Dibben MS Excel MVP