Application.OnTime (Excel)
Agenda um procedimento para ser executado em um momento especificado no futuro em uma hora específica do dia ou após um período específico de tempo.
Use Now + TimeValue(time) para agendar algo a ser executado quando um período específico de tempo (contando de agora) tiver decorrido. Use TimeValue(time) para programar algo para ser executado em uma hora específica. O valor de EarliestTime é arredondado para o segundo mais próximo. Defina Schedule como false para limpar um procedimento definido anteriormente com os mesmos valores Procedure e EarliestTime . Procedimento não pode receber argumentos e não pode ser declarado em uma classe ou formulário personalizado.
OnTime (EarliestTime, Procedure, LatestTime, Schedule)
Dim dtEarliestTime As Date: dtEarliestTime =
Dim strProcedure As String: strProcedure =
Application.OnTime EarliestTime:=dtEarliestTime, Procedure:=strProcedure
Arguments
O seguinte argumento é opcional
EarliestTime (Date) - A hora em que você deseja executar este procedimento.
Procedure (String) - O nome do procedimento a ser executado.
Optional arguments
Os seguintes argumentos são opcionais
LatestTime (Date) - A hora mais recente na qual o procedimento pode ser executado. Por exemplo, se LatestTime estiver definido como EarliestTime + 30 e o Microsoft Excel não estiver no modo pronto, copiar, cortar ou localizar em EarliestTime porque outro procedimento está sendo executado, o Excel aguardará 30 segundos para que o primeiro procedimento seja concluído. Se o Excel não estiver no modo pronto dentro de 30 segundos, o procedimento não será executado. Se esse argumento for omitido, o Excel aguardará até que o procedimento possa ser executado.
Schedule (Boolean) - True para agendar um novo procedimento OnTime. False para limpar um procedimento definido anteriormente. O valor padrão é True.