將一個(gè)略微復(fù)雜的工作內(nèi)容編入VBA，我們可能需要許多宏拼在一起運(yùn)行才能實(shí)現(xiàn)。那么如何按照自己想要的順序依次運(yùn)行這些宏，實(shí)現(xiàn)我們需要的結(jié)果？

一個(gè)辦法是編寫一個(gè)新的宏，分別按順序call你需要運(yùn)行的宏。call的方法有幾種，比較簡單的是以下兩種，

call 宏1

call 宏2

或者省略call，直接

宏1

宏2

這樣，你需要調(diào)用的宏就會按照順序執(zhí)行。

但是，當(dāng)你調(diào)用的宏非常多的時(shí)候，可能有幾十個(gè)，以上還是有點(diǎn)麻煩。此時(shí)可以如下操作：

所有的宏有規(guī)律命名，例如有15個(gè)，那么宏依次是
sub hong1,sub hong2,sub hong3......sub hong15
最后寫個(gè)循環(huán)匯總以上所有宏

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

運(yùn)行最后這個(gè)匯總宏，你的前15個(gè)宏就會依次按順序運(yùn)行。