vba,当前工作薄写入代码。如何获取切换工作簿后Workbook_Sheet...

发布网友发布时间：2024-05-06 10:47

共2个回答

热心网友时间：2024-05-28 17:27

尝试用一下vba的 Event事件机制

工作簿的 Workbook_SheetActivate(ByVal Sh As Object)

支持切换工作表时触发

在里面获取所有工作表的引用，然后循环调用所有工作表的vba声明的固定函数名或sub名就可以了，带一个target参数，传入参数即可

再看了一下问题，题主的意思应该是想在切换工作表后，之前的工作表做一些收尾工作，同样是用Workbook_SheetActivate事件，设置一个变量，激活事件时检测变量是否为空，不为空则调用变量对应的工作表，执行收尾工作，然后再把激活后的工作表引用赋值给该变量，循环过程。

热心网友时间：2024-05-28 17:29

无法获取别的工作簿的事件，必须安装一个APPLICATION级的类，可以获取正确EXCEL任意工作簿的事件，另外一个帖子给了你例子，你也可以百度搜索相关详细说明。