excel打开工作簿时自动运行指定的宏

Question

如题所述

Answer 1

如果需要在打开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”的顺序执行。