Notifications
Clear all

Executar rotina em determinada hora

6 Posts
4 Usuários
0 Reactions
1,887 Visualizações
(@betorubini)
Posts: 57
Trusted Member
Topic starter
 

Boa tarde

fazendo uma busca encontrei essa rotina

Application.OnTime TimeValue("13:00"), "NomeDaMacro"

ok, mas se eu quiser especificar o horário em determinada célula da planilha?
exemplo Planilha ("Horario") celula("h5")

Outra questão, rotina teria que funcionar com qualquer userfm aberto

Obrigado

 
Postado : 26/06/2013 9:59 am
(@vitor)
Posts: 57
Trusted Member
 

Application.OnTime TimeValue("SuaPlanilha".Range("Célula").Text), "NomeDaMacro"

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 26/06/2013 11:40 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Private Sub Workbook_Open()

   ' Application.OnTime TimeValue("13:00:00"), "Sua_Macro"
Application.OnTime TimeValue(CStr(Format([A1].Value, "hh:mm:ss"))), "Sua_Macro"
End Sub

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/06/2013 9:22 am
(@betorubini)
Posts: 57
Trusted Member
Topic starter
 

Boa tarde.

Mas tenho que colocar o código num modulo junto com a macro?
preciso que ela execute automaticamente

att

 
Postado : 27/06/2013 12:52 pm
depoisteconto
(@depoisteconto)
Posts: 183
Estimable Member
 

Boa tarde.

Mas tenho que colocar o código num modulo junto com a macro?
preciso que ela execute automaticamente

att

Cara, coloca Application em um módulo, mas vai precisar chamá-lo através de algum comando, por ex: um command button.

Não tenho como sugerir melhor sem conhecer em que consiste o "programa".

At

 
Postado : 27/06/2013 2:45 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Mas tenho que colocar o código num modulo junto com a macro?
preciso que ela execute automaticamente

Foi por isso que eu usei o metodo Private Sub Workbook_Open(), quando seu arquivo for aberto, o código entrará em ação!!

Esse código deve ser posto dentro da folha de código de EstaPasta_de_Trabalho.

Veja mais em:
http://www.ambienteoffice.com.br/office ... m_horario/

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/06/2013 4:29 pm