Grabar cada ... Minutos
Hola! Necesito grabar lo que ingreso en el libro cada cierto tiempo (no lo hago después de cada evento, porque el Libro "pesa", y puede interrumpir ingreso de datos). Necesito que, por ejemplo, cada 30 minutos, me grabe, mandando un MsgBox indicando que está grabando, o una barra de progreso...
Gracias!
Gracias!
1 respuesta
Respuesta de Juan Carlos González Chavarría
1
Esto lo puedes hacer de la siguiente forma:
1- Grabamos una macro que llamaremos Temporizador, el código es el siguiente:
Sub Temporizador()
Application.OnTime Now() + TimeValue("00:30:00"), "SalvarDoc"
End Sub
2- Grabamos otra macro que llamaremos SalvarDoc con este código:
Sub SalvarDoc()
ThisWorkbook.Save
Application.StatusBar = "Salvando"
Temporizador
End Sub
3- Grabamos otra macro que llamaremos AutoOpen
Sub AutoOpen()
Temporizador
End Sub
Con esto cada vez que abras tu archivo se ejecutará la macro y salvará tu documento cada 30 minutos.
1- Grabamos una macro que llamaremos Temporizador, el código es el siguiente:
Sub Temporizador()
Application.OnTime Now() + TimeValue("00:30:00"), "SalvarDoc"
End Sub
2- Grabamos otra macro que llamaremos SalvarDoc con este código:
Sub SalvarDoc()
ThisWorkbook.Save
Application.StatusBar = "Salvando"
Temporizador
End Sub
3- Grabamos otra macro que llamaremos AutoOpen
Sub AutoOpen()
Temporizador
End Sub
Con esto cada vez que abras tu archivo se ejecutará la macro y salvará tu documento cada 30 minutos.
Estos Códigos, ¿van en Workbook?
¡Perfecto, master!
Ahora, lo que me interesaba era un UserForm con la barra de Progreso (no en la barra de estado, que la tengo siempre oculta).
Pero eso te lo hago en otra pregunta...
Un abrazo
Ahora, lo que me interesaba era un UserForm con la barra de Progreso (no en la barra de estado, que la tengo siempre oculta).
Pero eso te lo hago en otra pregunta...
Un abrazo
