Cómo utilizar la demostración de WPS para hacer un reloj electrónico sencillo sin agujas

Abra el archivo de Excel, presione Alt+

F11

para ingresar al módulo de programación VBA, haga doble clic en el nombre de la hoja de trabajo para implementar la función y pegue el siguiente código (macro) a la derecha:

Opción

Explícito

Dim

I

Como

Entero

Sub

Proce()

1

Si

I

=

Entonces

Rango("A1")

=

Formato(Tiempo() ,

"h :mm:ss")

Fin

Si

DoEvents

Ir a

1

Fin

Sub

Sub

Run_Timer()

Application.OnTime

Ahora()

+

ValorTiempo

("00:00:01"),

procedimiento

:= "Proce"

Fin

Sub

Simplemente ejecute la macro Proce. Para detener, presione Ctrl+Pausa.