如果需要在打开Excel工作簿时自动运行某个宏,可以用下面的两个方法:
一、Workbook.Open 事件
1.在Excel中按快捷键Alt+F11,打开VBA编辑器。
2.在“工程”窗口中双击“ThisWorkBook”,在右侧的代码窗口顶部左侧的“对象”框中,选择“WorkBook”。这时,Excel自动在代码窗口中输入下面的代码:
Private Sub Workbook_Open()
End Sub
然后在其中输入需要执行的宏代码,如下例:
Private Sub Workbook_Open()
MsgBox ("Workbook_Open事件" & Chr(10) & ThisWorkbook.Name & "工作簿已打开!")
End Sub
3.保存工作簿并重新打开该工作簿。如上例中将弹出一个消息框。
二、用Auto_Open宏
1.在Excel中按快捷键Alt+F11,打开VBA编辑器。
2.单击菜单“插入→模块”,在右侧的代码窗口中输入名称为“Auto_Open”的宏,如下面的代码:
Sub Auto_Open()
MsgBox ("Auto_Open" & Chr(13) & "已打开" & ThisWorkbook.Name & "工作簿!")
End Sub
3.保存工作簿并重新打开该工作簿。如上例中将弹出一个消息框。
上述两种方法可以同时存在,但在打开工作簿时按照先“Workbook_Open“后“Auto_Open”的顺序执行。
……