Use some VBA code?

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Intersect(Target, Range("B1")) Is Nothing Then Exit Sub

Range("C2").Value = Int(Now)
'Change C2 to the cell reference you want
End Sub

format thbe date cell as you want the date to show

--
HTH

Sandy
In Perth, the ancient capital of Scotland
and the crowning place of kings


Replace @mailinator.com with @tiscali.co.uk


"houghi" wrote in message
...
I have a file where people fill out the date of today. If I use TODAY(),
I would get the wrong dates from the dates filled out previously.

My idea would be that the day of today is filled out when something si
enterd in B1. Obviously the day may not change then next day or days
ofter that.

The reason is that people WILL mistype the data.

Is this possible and if so, how? I am working with Excel 2003.

houghi
--
We all came out to Montreux Frank Zappa and the Mothers
On the Lake Geneva shoreline Were at the best place around
To make records with a mobile But some stupid with a flare gun
We didn't have much time Burned the place to the ground