PDA

View Full Version : date



aoc
06-03-2007, 11:55 AM
hi,

when any cell is activated in column A I want the date to be written in the cell. example 23.may.2007

regards

mdmackillop
06-03-2007, 12:16 PM
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.EnableEvents = False
If Target.Column = 1 Then
Target.Value = Format(Date, "d.mmmm.yyyy")
End If
Application.EnableEvents = True
End Sub