您的位置: 首页 > EXCEL技巧 > Excel基础 >

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

时间:2013-12-10 整理:docExcel.net
如果需要在打开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”的顺序执行。

怎样在打开Excel工作簿时禁止AutoOpen宏的运行 问题:怎样在打开Excel工作簿时禁止AutoOpen宏的运行
回答:...en 事件或模块中含有Auto_Open宏时,打开该工作簿就会运行指定的宏代码。但有时我们希望这些包含在Workbook.Open 事件或Auto_Open宏中的代码在打开工作簿时不自动运行,例如在该代码中还在调试过程中,或其中包含错误时。要实现...
单击单元格时运行一个指定的宏 问题:单击单元格时运行一个指定的宏
回答:...以用一个常规的方法来实现当单击某个单元格时运行一个指定的宏。方法如下: 1.选择一个单元格,按住Shift键的同时,单击菜单“编辑→复制图片”,在弹出的“复制图片”对话框中,“外观”选择“如屏幕所示”,“格式”...
Word2003指定复杂字体的特征 问题:Word2003指定复杂字体的特征
回答:1、选择需要更改其外观的文字。 2、在“格式”菜单上,单击“字体”,再单击“字体”选项卡。 3、在应用于选定文字的语言类型的一系列控件中选择字体的特征。 注释  所有局部(局部:共享相同属性...
用VBA批量创建指定名称的文件夹 问题:用VBA批量创建指定名称的文件夹
回答:有时在工作中需要批量创建指定名称的文件夹,如果数量较多,例如要创建几十、甚至几百个文件夹,用手动的方法很难完成。批量创建文件夹的工具有很多,如果一时手头没有这类工具,可以在Excel中用VBA来完成,方法如下: ...
Word2003将宏指定到工具栏按钮、菜单和快捷键 问题:Word2003将宏指定到工具栏按钮、菜单和快捷键
回答:如果要方便快捷地运行宏,可以将其指定到工具栏 (工具栏:包含可用于执行命令的按钮和选项的栏。要显示工具栏,请按 Alt 然后按 Shift+F10。)、菜单 (菜单:单击菜单栏或其他工具栏上的菜单名时出现的命令的列表。)或...
用VBA判断指定的工作簿是否打开 问题:用VBA判断指定的工作簿是否打开
回答:如果要判断一个指定的工作簿是否打开,可以将下面的VBA代码放入标准模块中,然后在子过程中进行调用。 Function IsWkbOpened(sWkbName As String) As Boolean 如果目标工作簿已打开则返回TRUE,否则返回FALSE Dim i As Long For i = Workbooks.Count To ...
相关推荐: