怎么样让Excel在打开时就自动执行编好的宏代码

Question

如题所述

Answer 1

首先进入VBA编辑器（ALT+F11进入、或者ALT+F8选宏再点编辑），然后再打开工程资源管理器（菜单查看下选中、或者直接按CTRL+R键），在资源管理器里面的ThisWorkBook上双击鼠标，会打开工作的相关代码，粘贴下面的例子代码：

1 2 3 4

Private Sub Workbook_open()

msgbox "工作表打开了"

'call 其它宏，或者继续写其它语句

End Sub

这样每次打开工作簿就会执行Workbook_open宏的代码。

Answer 2

你把录制好的宏，放在一个WorkBook的open事件中，然后把这个文件保存为XLA类型。再打开Excel，在文件、选项、加载项中添加这个xla。以后你双击你的Excel文件时，这个xla就能自动执行了

Answer 3

首先你需要把宏代码放在workbook的open事件中，这样才能在打开时自动执行。其次，由于你的宏代码只能执行当前工作表的动作，所以你需要编写类似于For
循环语句来遍历你所有的工作表。

Answer 4

Private Sub Workbook_open()
【功能代码】
End Sub

或者

Private Sub Workbook_open()
Call【代码名】
End Sub

Workbook_open事件代码为工作簿代码，一定要放在Thisworkbook模块内，否则不会自动运行。本回答被提问者采纳

Answer 5

1.
首先将Excel文档(默认新建扩展名为xlsx),另存为启用宏的工作簿,扩展名为xlsm。
2.
按下组合键ALt+F11快速切换到VBA。
3.
进入VBA窗口后的界面。
4.
双击ThisWorkbook后,会弹出一个代码窗口。
5.
在代码窗口中复制粘贴以下代码：Private Sub Workbook_Open()，MsgBox ("»¶Ó­ÄúʹÓÃExcel2013£¡")，End Sub。
6.
保存，关闭，重新打开Excel（扩展名为xlsm）文档就可以了。