Contador Tempo com vba

Códigos Design

O tempo com o vba é um recurso de infinitas possibilidades já que podemos fazer telas de apresentação, dar mensagem de bom dia, mexer em figuras, e ainda para pausar o código vba para chamar a atenção do cliente para específicas efeitos da mudança de seu código.

Contador Tempo com Vba

 

Segue abaixo 3 exemplos de Contador Tempo com Vba (pausas).

1 – Este exemplo faz uma pausa na macro até chegar no horário do dia atual.

Application.Wait "18:23:00"

_____________________________________________________
2 – Este código para a macro por aproximadamente 10 segundos.

newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 10
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime

_____________________________________________________

3 – Este outro exemplo pausa a macro indicando por quanto tempo passou.

If Application.Wait(Now + TimeValue("0:00:10")) Then
 MsgBox "Time expired"
End If

 

_____________________________________________________

Código retirados da fonte abaixo:

Fonte: http://msdn.microsoft.com/en-us/library/aa213656%28v=office.11%29.aspx