Saltar al contenido

Guardar excel automáticamente

Este sencillo código evita dolores de cabeza, al
guardar automáticamente cada 1 minuto, en este caso, pero se puede configurar
al tiempo que se desee, cambiando time value; cuantas veces nos ha pasado que se
tilda la pc o simplemente se corta la luz y perdemos todo el trabajo realizado
por no guardar el archivo ya sea porque nos olvidamos o porque nos da pereza guardar
el archivo, con este código agregado a tu libro no tendrás que guardar más ya
que lo hace automáticamente.

Código que se inserta en thisworkbook

Private Sub Workbook_Open()

Application.OnTime Now + TimeValue(«00:01:00»), «grabando»
End Sub

Código que se debe insertar en un módulo de VBA

Sub grabando()
ActiveWorkbook.Save
Application.OnTime Now + TimeValue(«00:01:00»), «grabando»

End Sub

Si te fue de utilidad puedes INVITARME
UN CAFÉ
 y de esta manera ayudar a seguir
manteniendo la página click para descargar.


.

If this post was
helpful INVITE ME A COFFEE and so help keep
up the page.

Si te gustó por favor compártelo con tus amigos
If you liked please share it with your friends