Sub NOWTIME()
ActiveCell.Value = Format(Now(), "h:mm:ss AM/PM")
End Sub

Assign to a button on your toolbar.


Gord Dibben MS Excel MVP

On Thu, 31 Jul 2008 07:35:22 -0700, Dale G
wrote:

Hi all, just wondering if it is possible to enter the time in a cell with
only pushing one button. I know I can use ctrl+shift+: to enter the time, but
someone told me there is a way to enter the time with only 1 button.