I want to insert the TIME into a cell by the click of
the mouse button.

What do I neen to add to the beginning of
this formula

Sub Macro3()
'
' Keyboard Shortcut: Ctrl+x
'
ActiveCell.FormulaR1C1 = "=NOW()"
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub


--
Taz