Adding A Date To Adjacent Cell
 

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

Adding A Date To Adjacent Cell
 

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

--
Best Regards,

Luke M
"FS" wrote in message
...
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

Adding A Date To Adjacent Cell
 

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

On Mon, 29 Mar 2010 12:17:01 -0700, FS wrote:

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