一个模块中的多个宏如何按顺序自动运行(Excel VBA)

2021-09-07 17:29:11 浏览数 (1)

将一个略微复杂的工作内容编入VBA,我们可能需要许多宏拼在一起运行才能实现。那么如何按照自己想要的顺序依次运行这些宏,实现我们需要的结果?

一个办法是编写一个新的宏,分别按顺序call你需要运行的宏。call的方法有几种,比较简单的是以下两种,

call 宏1 call 宏2

或者省略call,直接

宏1 宏2

这样,你需要调用的宏就会按照顺序执行。

但是,当你调用的宏非常多的时候,可能有几十个,以上还是有点麻烦。此时可以如下操作:

所有的宏有规律命名,例如有15个,那么宏依次是 sub hong1,sub hong2,sub hong3......sub hong15 最后写个循环汇总以上所有宏

Sub huizong() Dim q For q = 1 To 15 Application.Run "hong" & q Next q End Sub

运行最后这个汇总宏,你的前15个宏就会依次按顺序运行。

0 人点赞