Notifications
Clear all

Executar um Ontime uma vez por semana

2 Posts
2 Usuários
0 Reactions
1,337 Visualizações
(@edgard-jr)
Posts: 31
Eminent Member
Topic starter
 

pessoal como faço para esse macro ser essecutado apenas nas segundas feiras as 23:59???
NO exemplo abaixo ele executa apos 10 segundos.

Public Sub ExecutaOnTime()
MsgBox "Opa! Executou."
End Sub

Public Sub TesteOnTime()
Call Application.OnTime(Now + TimeValue("00:00:10"), "ExecutaOnTime")
End Sub

 
Postado : 17/12/2011 11:22 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia Edgard

Eu vi em outro fórum que vc poderá utilizar o agendador de tarefas do próprio windows para abrir o arquivo e executar a rotina. Ele abre a planilha mesmo que ela esteja fechada.
Na tua planilha coloque uma rotina workbook_open() que é acionada automaticamente quando a planilha é aberta. Nessa rotina, coloque um call para a sua macro.

Espero ter ajudado.

Um abraço e boas festas!

 
Postado : 23/12/2011 7:07 am