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

Excel函数 2022-02-13 20:35:07

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