Wikipedia

Resultados de la búsqueda

jueves, 9 de junio de 2011

CODIGO MACRO

Sub reloj()
'Mostramos la hora
ActiveSheet.Range("A1") = Format(Now, "hh:mm:ss")
Application.OnTime (Now + TimeSerial(0, 0, 1)), "reloj"
End Sub

No hay comentarios: