作者:乔山办公网日期:
返回目录:excel表格制作
自己编一段代码来 然后运行这个宏代码 就可以一次把所有的宏(你的这段代码中写进去的) 都运行了……
代码的格式如下……
Sub 运行所有的宏()
表名称.宏名称
表名称.宏名称
……
End Sub
就这样 把 你要运行的宏 都写进去 然后 再需要源的时候 直接运行这个宏 就可以了……
你可以通过如下操作来完成……
1、alt+F11 组合键 打开vbe 窗口 ……
2、双击 左边工程窗口中的 ThisWorkbook 然后在代码窗口中 输入 Sub 运行所有的宏() 回车 然后接下来 输入:表名称百 英文逗号接下来就可以看到你这个表名下的宏的名称了 逐步选择 或者输入都可以 ,然后回度车另起一行 重复上面的操作 直到把所有的宏 都写进去……
1、首先将Excel文档(默认新建扩展名为xlsx),另存为启用来宏的工作簿,扩展名为xlsm。
2、按下组合键ALt+F11快速切换到VBA。
3、进入VBA窗口后的界面,源如图所示。
4、双击ThisWorkbook后,会弹出一个代码窗口。
5、在代码窗口中复制百粘贴以下代码:Private Sub Workbook_Open(),MsgBox ("»¶ÓÄúʹÓÃExcel2013£¡"),End Sub。
6、保存,关闭,重新打开Excel(扩展名为xlsm)文档就可以了度。
按住Alt+F11
来查看大图" class="ikqb_img_alink">
双击Sheet1(Sheet1),就是自包含你的公百式的工作表
输入代码度:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$10" Then Macro1
End Sub
假设你那个需要打开的抄宏叫做tmp(),而这个宏定义在sheet1中的,那么你就可以zhidao在ThisWorkBook里输入
Private Sub Workbook_Open()
call sheet1.tmp
End Sub