Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Frecuencia grabación Hoja

30/07/2003 - 11:16 por Irueli | Informe spam
Ayuda Hacer una pregunta
Saludos,

Tengo una macro para guardar una hoja excel como pagina web, funciona bien.
Ahora quisiera incluirle que cada 15 minutos, me la grabase, de forma
continua, sin intervenir yo y dandole solo una vez al botón donde adjudico
la macro.

La verdad es que he intentado algo con Timer y un do while, pero no me
funciona, me lo hace una vez y nada más.

Si se pudiese interrumpir tambien una vez en marcha, pues mejor.
Aquí os adjunto la macro de grabar como pagina web.
Gracias por la atención

Sub GrabarHTM()
'
' GrabarHTM Macro
' grabar excel a htm
'
' Acceso directo: CTRL+z
'
Range("I2").Select
ActiveWindow.LargeScroll Down:=4
Range("A2:N123").Select
Range("A1").Activate
With ActiveWorkbook.PublishObjects.Add(xlSourceRange, _
"C:\Isiweb\cotizaciones.htm", "Hoja1", "$A$2:$N$123", xlHtmlStatic,
_
"inputwebMC_4945", "")
.Publish (True)
.AutoRepublish = False
End With
ChDir "C:\Isiweb"
Range("A1").Select
End Sub

Saludos y suerte
irueli@terra.es
http://www.terra.es/personal/irueliri
email Siga el debateRespuesta 4 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Ana Cuesta [MS]
30/07/2003 - 12:06 | Informe spam
Hola ,

Esto se puede hacer utilizando el método Ontime del objeto aplicación, así
lo que tienes que hacer es en el evento Open del objeto WOrkbook poner lo
siguiente:
Application.OnTime EarliestTime:=Now +TimeValue("00:15:00"),
Procedure:="GrabarHTM", Schedule:=True
Esto hace que a partir de 15 minutos desde que abres el libro se ejecute tu
macro . NO puedes olvidar en el evento BeforeClose desactivar esta macro
para ello:
Application.OnTime EarliestTime:=Now , Procedure:="GrabarHTM",
Schedule:=False

Espero que te sirva de ayuda
Un saludo

Ana Cuesta
Microsoft España

Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no
otorga ningún derecho.
"Irueli" wrote in message
news:T1MVa.759362$
Saludos,

Tengo una macro para guardar una hoja excel como pagina web, funciona


bien.
Ahora quisiera incluirle que cada 15 minutos, me la grabase, de forma
continua, sin intervenir yo y dandole solo una vez al botón donde adjudico
la macro.

La verdad es que he intentado algo con Timer y un do while, pero no me
funciona, me lo hace una vez y nada más.

Si se pudiese interrumpir tambien una vez en marcha, pues mejor.
Aquí os adjunto la macro de grabar como pagina web.
Gracias por la atención

Sub GrabarHTM()
'
' GrabarHTM Macro
' grabar excel a htm
'
' Acceso directo: CTRL+z
'
Range("I2").Select
ActiveWindow.LargeScroll Down:=4
Range("A2:N123").Select
Range("A1").Activate
With ActiveWorkbook.PublishObjects.Add(xlSourceRange, _
"C:\Isiweb\cotizaciones.htm", "Hoja1", "$A$2:$N$123",


xlHtmlStatic,
_
"inputwebMC_4945", "")
.Publish (True)
.AutoRepublish = False
End With
ChDir "C:\Isiweb"
Range("A1").Select
End Sub

Saludos y suerte

http://www.terra.es/personal/irueliri


Preguntas similares

 

Busqueda sugerida :