Data entry date

  • Thread starter Thread starter jamie85
  • Start date Start date
J

jamie85

I would like a date column so that when i enter data in to say, row A1
i would like the date to appear so i know which day i entered tha
data. Any formulae to do this? Thankyou
 
Jamie,

There is no formula as such, as TODAY() and NOW() are volatile, that is
theyre-calculate every time, but it can be circumvented with VBA. This came
up recently, and again the best solution IMO was this one from Harlan Grove.
Obviously, you can name it whatever you want, it doesn't have to be __NOW__

=============================================
I'd have the Open event add the workbook-level name __NOW__ with the
date/time value when the workbook was first opened by a user (rather than
the developer, who would need to leave __NOW__ undefined or initialized to
#N/A). Then the name __NOW__ could be used anywhere in any formula in the
workbook.


Private Sub Workbook_Open()
On Error GoTo CleanUp
Application.EnableEvents = False

If IsError(Evaluate("__NOW__")) Then _
Me.Names.Add Name:="__NOW__", RefersTo:=Now

CleanUp:
Application.EnableEvents = True
End Sub


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Back
Top