VBA code to autopost date and time stamp

[NextGen]

I'm trying to create VBA code or a Macro that will autopost date & time stamping if a cell is populated but will leave the cell blank if it is not populated.

For instance if A5 has date entered into it I want A6 to have the date time stamp in it. Yes it would require the cell under for this instance. I have 5 days so I would need A6 to populate if A5 is entered and then B6 to populate if B5 is entered and so on for C, D, and E.

I have searched the web and have found lots of codes but none that can accomplish what I want.

Would appreciate any help I can get! Thanks in advance!

 

[Worf]

Hello and welcome to the Board

See if this is what you want:

' this goes at the sheet module


Private Sub Worksheet_Change(ByVal Target As Range)
' monitors only range A5:E5


If Not Intersect(Target, Range("a5:e5")) Is Nothing And Target.Value <> "" Then _
    Target.Offset(1).Value = Date & " " & Time
    
End Sub