How To Insert The Current Date In Excel?

Please see thee attached Excel Sheet.
If I have an Excel Macro that is going to insert new data into column B,C,D,E once a day,
what is the best way to insert the "Current Day" into Column A so that the Macro will do this for me? (As an example I would need Column A Row 3 as 9/28/2013, then Row 4 as 9/29/2013, etc.

Any help would be greatly appreciated.
Thank you...
Who is Participating?
FamousMortimerConnect With a Mentor Commented:
Hi Rick,

I built a little function that will add one day to the date in the cell above when a value is entered into columns B, C, D, or E.  If it is the first row, then it will enter today's date.  See attached example.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    With Cells(Target.Row, 1)
        If Not Intersect(Columns("B:E"), Target) Is Nothing And Not IsDate(.Value) Then
            If Not IsDate(.Offset(-1, 0).Value) Then
                .Value = Date
                .Value = Cells(Target.Row - 1, 1).Value + 1
            End If
        End If
    End With
End Sub

Open in new window

No need for a Macro. In column A3 just put =NOW() and in Column A4 put =NOW() + 1. if i understand you, that will put current date in the A3 cell each time the document is open and A4 would be tomorrows. Unless I'm missing something in the explanation that will work.
ES-ComponentsAuthor Commented:
Just Great!!!!!!
This is just what I needed. Thank you very much for that quick response.

Glad to help and thank you for the score!
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.