Or simply use an If statement to check this.
Code:
If Range("A1").Value = "" Then Range("A1").Value = Date
On subsequent dates, the date in cell A1 will not change, because cell A1 is not empty anymore.
(I used the Date function in VBA to return the Date without the time).