Excel - Macro con funcion

Me gustaría crear una macro que me inserte la función ahora() en la casilla en la que me encuentre, lo he conseguio, pero mi problema es que al ejecutar la macro en otra casilla me actualiza todas las anteriores, es decir me pone la misma fecha en todas las celdas del documento en el que he ejectuado la macro.

Sub fecha()
'
' fecha Macro
' Macro grabada el 22/02/2007 por X
'

'
ActiveCell.FormulaR1C1 = "=NOW()"
End Sub

Un saludo y muchas gracias de antemano

Es normal, mientras tengas la función ahora(), excel siempre te mostrará el valor de ahora después de cualquier evento.
Lo que debes hacer es pegar el valor de ahora, no la función.

Saludos

Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 23/02/2007 por a
'
' Acceso directo: CTRL+f
'
ActiveCell.FormulaR1C1 = "=NOW()"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub