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

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

Boa tarde.

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

att

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

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