Hora Do Formulario Do Vba

[Guest Michele]

Bom tarde pessoal,

preciso colocar um relógio no formulario do VB , ou melhor, no formulário do vba dentro do excel, alguém pode me ajudar ...

preciso que a hora seja atualizado a acada segundo

Atenciosamente,

Michele

[RenatoMejias]

Movendo para VBA.

----------------------------------------------------------------------

Use um timer.

[Guest Visitante]

Bom tarde pessoal,

preciso colocar um relógio no formulario do VB , ou melhor, no formulário do vba dentro do excel, alguém pode me ajudar ...

preciso que a hora seja atualizado a acada segundo

Atenciosamente,

Michele

Option Explicit

Dim T

Sub StopTimer()

On Error Resume Next

Application.OnTime T, Procedure:="Update", Schedule:=False

End Sub

Sub StartTimer()

T = Now + TimeValue("00:00:01")

Application.OnTime T, "Update"

End Sub

Sub Update()

UserForm1.Label1.Caption = Format(Now, "hh:mm:ss")

Call StartTimer

End Sub