keeping up to date

**eLearning Official** · 01-26-2010, 02:13 PM

I am trying to document in an excel what days I do a certain thing. So I want to have the date and time inserted in a cell lets say A2 when I type in lets say B2 And I want that to continue down the column on both a and b. So the date is inserted when corresponding cell has characters in it. Any ideas? for a macro or VBA code?

thanks guys.

**Richard Buttrey** · 01-26-2010, 02:28 PM

Hi and welcome to the forum.

Put the following in the Worksheet Change event (F11 to the Visual Basic Environment, double click the sheet in question, from the left hand drop down select 'Worksheet' and in the right hand drop down select 'Change'

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("B:B")) Is Nothing Then
        Range("A" & Target.Row) = Format(Date, "mm/dd/yy") & "_" & Format(Time, "h:m:s")
    End If
End Sub

HTH