Ejecución de un procedimiento cuando se abre un libro de trabajo (Microsoft Excel)
Puede hacer que Excel ejecute un procedimiento automáticamente cada vez que se abra un libro en particular. Por ejemplo, cuando se abre el libro de trabajo, es posible que desee ejecutar un procedimiento que pregunte a los usuarios si desean realizar alguna tarea, como guardar los datos del día anterior en otro archivo.
En realidad, Excel proporciona dos formas diferentes de ejecutar un procedimiento cuando se abre un libro. En ambos casos, todo lo que necesita hacer es proporcionar un nombre especial para la macro; esa es la pista que le dice a Excel que desea ejecutar el procedimiento al abrir. Si lo desea, puede nombrar el procedimiento Auto_Open y colocarlo en un módulo de macros normal. También puede definir un procedimiento llamado Workbook_Open dentro del objeto ThisWorkbook.
Como ejemplo, considere el siguiente código:
Sub Auto_Open() Dim sMsg As String Dim iBoxType As Integer Dim iUpdate As Integer Dim sDefault As String Dim sOldFile As String Dim iStatusState As Integer sMsg = "Do you want to save yesterday's transactions?" iBoxType = vbYesNo + vbQuestion iUpdate = MsgBox(sMsg, iBoxType, "Automatic Backup") If iUpdate = vbYes Then sMsg = "Which filename would you like use?" sDefault = "OLD.DAT" sOldFile = InputBox(sMsg, "Automatic Backup", sDefault) iStatusState = Application.DisplayStatusBar Application.DisplayStatusBar = True Application.StatusBar = "Updating past months..." UpdateYesterday(sOldFile) Application.StatusBar = False Application.DisplayStatusBar = iStatusState End If End Sub
(Recuerde que este procedimiento es un ejemplo; no se ejecutará correctamente en su sistema porque llama a una función llamada UpdateYesterday, que realiza la actualización real).
Esta macro se ejecuta automáticamente siempre que se abre el libro al que está adjunta. También puede modificar el código y colocarlo dentro del objeto ThisWorkbook simplemente cambiando la primera línea a esto:
Private Sub Workbook_Open()
_Nota: _
Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.
link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador]
.
ExcelTips es su fuente de formación rentable en Microsoft Excel.
Este consejo (8451) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:
link: / excel-Running_a_Procedure_when_a_Workbook_is_Opened [Ejecutar un procedimiento cuando se abre un libro]
.