作者:乔山办公网日期:
返回目录:excel表格制作
提供四种方法:
1、模块写auto_open过程
Sub auto_open()
call aa
End sub
2、工作簿事件
在ThisWorkBook里写
Private Sub Workbook_Open()
call aa
End Sub
3、程序级事件
还是在ThisWorkBook里写
Private WithEvents xlApp As Excel.Application
Private Sub Workbook_Open()
Set xlApp = Application
End Sub
Private Sub xlApp_WorkbookOpen(ByVal Wb As Workbook)
Call aa
End Sub
以上,注意你的aa过程,要在模块中
VBA要自动运行?
不知道你想表达啥意思?
最简单的是写各按钮,
然后将按钮对应的源码写成你这样
最后一点击就可以了
欢迎与肥波猫一起讨论,谢谢关注,谢谢点赞,欢迎在评论中发表观点。
本文标签: