Bom Dia, como faço para executar essa macro toda vez que eu abrir a planilha
Dim Inicio As Boolean
Sub MeuRelogio()
If Inicio = True Then
Range("A1").Value = Time
Application.OnTime Now() + TimeValue("00:00:01"), "MeuRelogio"
End If
End Sub
Sub IniciarRelogio()
Inicio = True
Call MeuRelogio
End Sub
Sub PararRelogio()
Inicio = False
End Sub
Postado : 20/07/2018 7:44 am