Create a button from the Forms command bar, and assign to it the
following macro:

Sub TimeStamp()
ActiveCell.Value = Int(Now)
End Sub



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Tom Meacham" wrote in message
...
I want to create a button that when clicked will enter todays
date in the selected cell. Basically a date stamp button. I
tried doing a macro but it did not work for me. I know the
shortcut of ctrl+; to enter a date but I have others using the
worksheet.

Thanks