date fields

C

coconutt

I am curious if their is a way to insert a date automatically in a field each
time the field is entered. ei. my A collum is a date collum and each line
needs a date.

Thanks
 
B

Bob Phillips

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Column = 1 Then
Target.Value = Format(Date, "dd mmm yyyy")
End If

End Sub

'This is worksheet event code, which means that it needs to be
'placed in the appropriate worksheet code module, not a standard
'code module. To do this, right-click on the sheet tab, select
'the View Code option from the menu, and paste the code in.
 
Top