Hora real en Excel con OnTime
El presente ejemplo funciona con el método OnTime, y se desarroló para mostrar la hora real en un WordArt, que a su vez, está vinculado con una celda que actualiza la hora cada segundo, haciendo el efecto de un reloj digital.
Imagen del ejemplo:
Código del ejemplo:
Private Sub Workbook_Open() Call Reloj End Sub ' Sub Reloj() Range("A2").Formula = "=NOW()" Application.OnTime Now + TimeValue("00:00:01"), "reloj" End Sub