Ken

You could put the code below in the worksheet class module. (Right click on
the sheet tab and select View code...)

Private Sub Worksheet_Change(ByVal Target As Range)
Range("A1").Value = Now()
End Sub

It will update the date and time in cell A1 on the sheet when any cell is
changed

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
HIS


"Ken Ivins" wrote in message
...
I would like to put a formula in a field that will show today's day when
ever there is a change made to a work sheet. If the is no change then I
like
the last date to stay as is. Can this be done as a simple formula or a
macro
and how so?

Thanks,
Ken Ivins