Views

Histats

Vitrine

VBA Excel - Execução periódica de Código

Inline image 1

Podemos delinear dentro das nossas aplicações como o MS Excel, que executem procedimentos a partir de um horário previamente definido. É
 um recurso simples, mas em determinadas situações é bem útil.

Crie um módulo e cole o código abaixo:

Const sTempo As String = "00:00:03"

Public Sub DefineT()
    Application.OnTime EarliestTime:=Now() + TimeValue (sTempo), Procedure:="
SetT
"
End Sub

Public Sub CancelT()
    Application.OnTime EarliestTime:=Now() + TimeValue (sTempo), Procedure:="
SetT
", Schedule:=False
End Sub

Public Sub SetT()
    MsgBox "Agora são " & Time & "."

    
DefineT
End Sub

Em 3 segundos é mostrada uma Caixa de Mensagem.


Reference:
Tags: Excel, VBA, timer, 

Inline image 1

LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...