Hola, necesito crear una macro que me autoguarde
Hola, necesito crear una macro que me autoguarde hoja excel a las 06:00 horas de cada día, para poder ver los datos desde otro PC a esa hora. Saludos y gracias
1 respuesta
Respuesta de jpcjose
1
Tendrías que ingresar las siguientes macros:
Sub Auto_open()
Application.OnTime TimeValue("18:00:00"), "GUARDAR"
End Sub
Sub GUARDAR()
MsgBox ("Son las 18:00, el libro se guardará")
ActiveWorkbook.Save
' una vez guardado esta sentencia te cierra el libro
ActiveWorkbook.Close
End Sub
Sub Auto_open()
Application.OnTime TimeValue("18:00:00"), "GUARDAR"
End Sub
Sub GUARDAR()
MsgBox ("Son las 18:00, el libro se guardará")
ActiveWorkbook.Save
' una vez guardado esta sentencia te cierra el libro
ActiveWorkbook.Close
End Sub
Hola dionijose85, muchas gracias por esta macro que me va ahorrar mucho tiempo.
Tengo dos duda¨:
1ª-¿Cómo hacer que guarde sin pedir confirmación?
2º-Le he quitado la opción de que cierre el libro (porque tiene que seguir abierto para otro turno de trabajo), ¿me seguirá actuando la macro a la hora establecida ya que no se cierra el libro?
Muchas gracias
Tengo dos duda¨:
1ª-¿Cómo hacer que guarde sin pedir confirmación?
2º-Le he quitado la opción de que cierre el libro (porque tiene que seguir abierto para otro turno de trabajo), ¿me seguirá actuando la macro a la hora establecida ya que no se cierra el libro?
Muchas gracias
La sentencia Activeworkbook. Sabe te guarda el archivo, esta sentencia no te pide confirmación, a menos que el libro no se haya guardado previamente, es lo mismo que hacer crlt+G.
Cuando abres un libro por primera vez y presionas guardar... este te va a pedir la carpeta en la cual vas a guardar y el nombre, posterior a eso cada que haces click en guardar, no te va a salir ningún mensaje, lo mismo pasa con esta sentencia.
Y lo otro, si tu eliminas la clausula de cerrar (ActiveWorkbook. Close) no pasa nada, simplemente el libro no se cierra pero si se guarda.
Cuando abres un libro por primera vez y presionas guardar... este te va a pedir la carpeta en la cual vas a guardar y el nombre, posterior a eso cada que haces click en guardar, no te va a salir ningún mensaje, lo mismo pasa con esta sentencia.
Y lo otro, si tu eliminas la clausula de cerrar (ActiveWorkbook. Close) no pasa nada, simplemente el libro no se cierra pero si se guarda.
