I recorded a macro to enter the current time using the "Now()" function and
then copy and paste as a value so that the value remains constant. Then I
want to point to another cell and repeate the process. However the following
macro only goes back to the original cell that was used when the macro is
first invoked. How do I set a "relative cell reference? I'm trying to
create a time card template for posting an employee's log-in time and log-out
time and then compute total hours worked.

My Macro:
'TimeInput Macro
'
ActiveCell.FormulaR1C1 = "=NOW()"
Range ("B5").Select I want this to be
relative to
where the
currently selected cell is
Selection.Copy
Selection.PasteSpecial Paste:=x1PaxteValues, Operation:=x1None, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
End Sub