Auto entry on cell entry

[Tony]

into I have a column of cells I want to enter the current date everytime I
click in the cell. How do I do this?

 

[מיכ×ל (מיקי) ×בידן]

Assume col. "B" is concerned and you will compromise with a double-Click -
try the following Event-Macro typed into the sheets level:

 

[Dave Peterson]

Excel doesn't have a click event that you can use. But it does have a
_beforedoubleclick and _beforerightclick.

This uses the beforerightclick event:

Option Explicit
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Dim myRng As Range
Set myRng = Me.Range("A:a") 'all of column A

Set Target = Target.Cells(1) 'one cell only

If Intersect(Target, myRng) Is Nothing Then
'do nothing
Else
Cancel = True 'don't show the rightclick popup menu
With Target
.NumberFormat = "mmmm dd, yyyy"
.Value = Date
End With
End If

End Sub

Rightclick on the worksheet tab that should have this behavior. Select view
code and paste this code into the newly opened code window (usually on the right
hand side).

Then back to excel to test it out.

 

[מיכ×ל (מיקי) ×בידן]

The following Event-Macro is, exactly, what you are after (in Col. "B")