date fields

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

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
 
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.
 
Back
Top