Ejecutar macro todos los dias a una hora

24/09/2006 - 12:58 por martin | Informe spam
Hola a todos, hice una macro (con ayuda inestimable de este grupo) para
guardar cada dia un fichero que a su vez ha acumulado datos a diversas
horas del dia.

La macro es:

Sub ACTIVADOR()


Application.OnTime Now + TimeValue("00:00:02"), "activado"


Application.OnTime TimeValue("08:30:00"), "activado"


Application.OnTime TimeValue("09:30:00"), "Ruta1"

Application.OnTime TimeValue("12:30:00"), "Ruta2"

Application.OnTime TimeValue("15:00:00"), "Ruta3"

Application.OnTime TimeValue("19:30:00"), "Ruta4"

Application.OnTime TimeValue("22:25:00"), "Guardar_diario"
Application.OnTime TimeValue("23:14:00"), "desactivado"

End Sub



Si ejecuto ACTIVADOR, esto funciona perfectamente. Mi problema es que solo
lo hace una vez, es decir para que trabaje la macro al dia siguiente, tengo
que volver a ejecutarla. Yo creia que Application.OnTime sobre una hora se
auto-ejecutaria sin mas intervencion CADA DIA, sin embargo solo lo hace una
vez y si nadie lo ejecuta al dia siguiente, no funciona. ¿Hay alguna forma
de que se ejecute al dia siguiente y sucesivos de modo automatico?, de esa
forma podria irme de vije un par de dias y tener los datos de esos dos dias
a la vuelta.


Gracias de antemano. Un saludo a todos. Martin.
 

Leer las respuestas

#1 AnSanVal
24/09/2006 - 16:16 | Informe spam
¿El/la ordenador/computadora es desconectado/a cada dia?
Podrias ejecutar ACTIVADOR desde el evento Workbook_Open.

Saludos desde Tenerife.

"martin" escribió en el mensaje
news:ef5od8$pvm$
Hola a todos, hice una macro (con ayuda inestimable de este grupo) para
guardar cada dia un fichero que a su vez ha acumulado datos a diversas
horas del dia.

La macro es:

Sub ACTIVADOR()


Application.OnTime Now + TimeValue("00:00:02"), "activado"


Application.OnTime TimeValue("08:30:00"), "activado"


Application.OnTime TimeValue("09:30:00"), "Ruta1"

Application.OnTime TimeValue("12:30:00"), "Ruta2"

Application.OnTime TimeValue("15:00:00"), "Ruta3"

Application.OnTime TimeValue("19:30:00"), "Ruta4"

Application.OnTime TimeValue("22:25:00"), "Guardar_diario"
Application.OnTime TimeValue("23:14:00"), "desactivado"

End Sub



Si ejecuto ACTIVADOR, esto funciona perfectamente. Mi problema es que solo
lo hace una vez, es decir para que trabaje la macro al dia siguiente,
tengo
que volver a ejecutarla. Yo creia que Application.OnTime sobre una hora se
auto-ejecutaria sin mas intervencion CADA DIA, sin embargo solo lo hace
una
vez y si nadie lo ejecuta al dia siguiente, no funciona. ¿Hay alguna forma
de que se ejecute al dia siguiente y sucesivos de modo automatico?, de esa
forma podria irme de vije un par de dias y tener los datos de esos dos
dias
a la vuelta.


Gracias de antemano. Un saludo a todos. Martin.


Preguntas similares