Pedepano,
Na célula em que deseja mostrar a hora insira a função =agora(), em seguida formate o formato para "personalizado" dd/mm/aaaa hh:mm:ss, em seguida abra o editor vba, inicie um módulo padrão e cole o cód. abaixo:
Dim Go As Boolean
Sub IniciaRelogio()
Go = True
MeuRelogio
End Sub
Sub MeuRelogio()
If Go Then
ActiveSheet.Calculate
Application.OnTime Now() + TimeValue("00:00:01"), "MeuRelogio"
End If
End Sub
Sub ParaRelogio()
Go = False
End Sub
para executar vá em macros e execute a macro "iniciar relogio"...ponha um atalho de teclado para dar início.
Bem é isso espero ter te ajudado.
Se sim click na mãozinha para agradecer...vlw
Postado : 07/06/2018 10:13 am