Nem precisa da planilha se você já explicou, a não ser que tenha algo mais alem da questão de executar uma macro a cada 5 minutos.
Para executar uma rotina a cada 5 minutos faça o seguinte :
De dois cliques em EstaPasta_de_trabalho e cole as rotinas abaixo :
Private Sub Workbook_Open()
'Chama a rotina com o tempo definido
Call ExecutaTempo5min
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Cancela a execução do tempo
On Error Resume Next
Application.OnTime EarliestTime:=DownTime, Procedure:="ExecutaTempo5min", Schedule:=False
End Sub
Em um outro Modulo cole esta :
Sub ExecutaTempo5min()
'Executa a cada 5 minutos
DownTime = Now + TimeValue("00:05:00")
'Altere o nome de "NomedaMacroaExecutar"
'para a rotina associada ao seu botão "Clique aqui para atualizar"
Application.OnTime DownTime, "NomedaMacroaExecutar"
End Sub
A macro "NomedaMacroaExecutar" será executada a cada 5 minutos.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 28/03/2016 8:23 pm