![]() |
Guardar cambios automáticamente, sin preguntar Buenos días!! :aplauso: Estoy ejecutando unas macros cuando se abre el libro y cuando se cierra lo que quiero es que cuando se cierre el libro y ejecute mi macro, los cambios que le he realizado se guarden automáticamente sin que salga ese molesto cuadro que dice: "Desea guardar los cambios si/no", agradezco cualquier comentario. :si: Gracias. :-) |
Re: Guardar cambios automáticamente, sin preguntar |
Re: Guardar cambios automáticamente, sin preguntar Hola 3Pies!!! Application.DisplayAlerts = False, ésta instrucción ya la había utilizado y no funcionó como lo quería, lo que deseo es que cuando salga este cuadro desde código se pueda confirmar y que siempre la respuesta sea "si" osea que nunca le pregunte al usuario si desea guardar los cambios, no sé si esto es posible pero agradezco tu comentario :si: |
Re: Guardar cambios automáticamente, sin preguntar Pues de cada 10 veces, debería funcionarte 10. La tienes que poner antes de guardar el fichero. Si no te funciona, creo que no vas a poder conseguir lo que pretendes, pues desde el momento en el que se presenta en pantalla el formulario para responder Si/No, lo que se pretende es que el usuario interactúe con el mismo. No creo que se pueda automatizar una respuesta, pues ya no es el macro quien tiene el control, sino que es el cliente quien debe responder, y el macro seguirá actuando en función de la respuesta. Prueba este macro en un libro nuevo: Código: Sub Macro1() |
Re: Guardar cambios automáticamente, sin preguntar Como te dije no funciona como yo lo quiero, pero ya encontre como hacerlo y es muy parecido al código que me enviaste, muchas gracias por los comentarios, por si alguien tiene la misma duda o algo por el estilo lo que encontre fue este código: Sub Auto_Close() 'Mis intrucciones ThisWorkbook.Save End Sub Y este se escribe en el ThisWorkbook Un saludo |
| La zona horaria es GMT -6. Ahora son las 01:25. |
Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.