asignar la fecha a una celda

[santandereano]

Deseo saber la sentencia que permite asignar a una variable la fecha del sistema.

 

[galileogali]

Sub probar()
[A1] = Date
End Sub

 

[santandereano]

gracias galileogali por su ayuda.. encontré que la hora la puedo sacar con [a1] = now