"Date" Function using "If"

[scooters8]

I am creating a small database in excel to hold records I will add to over the next few years. When I create a new record and type in a home address, I want today's date to automatically populate in a different cell. I am currently using the formula: =IF(A1,TODAY()," ").

However I am experiencing a problem because the date will not remain constant. It will always reflect the current date instead of the date that I entered the record.

How can I have the current date automatically generate when I enter an address in a seperate cell, and keep that date constant?

Thanks![/img]

 

[tactps]

You can input it manually, using shortcut keys:
Current date Select a cell and press CTRL+;
Current time Select a cell and press CTRL+SHIFT+;
Current date and time Select a cell and press CTRL+; then SPACE then CTRL+SHIFT+;

or:
1. Press Alt-F11 to bring up VBA
2. In the left pane, double-click the sheet you want to attach this to
3. In the right pane, paste this in (change the addresses as required):

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then [b1] = Date
End Sub

 

[scooters8]

Thanks!