How can I enter todays date with a macro, without the date updating tomorrow?

One way:

Public Sub InsertDate()
With ActiveCell
.Value = Date
.NumberFormat = "dd mmm yyyy"
End With
End Sub

However, simply typing CTRL-; may work for you without a macro.


In article ,
in_trouble wrote:

How can I enter todays date with a macro, without the date updating tomorrow?

See if this will do it...i'm no expert though

Sub datemacro()
With ActiveCell
.FormulaR1C1 = "=TODAY()"
.Copy
.PasteSpecial Paste:=xlPasteValues
End With
Application.CutCopyMode = False
End Sub

"in_trouble" wrote:

How can I enter todays date with a macro, without the date updating tomorrow?