在 VBA 中呼叫 Sub

Iqra Hasnain 2022年7月18日
在 VBA 中呼叫 Sub

我們將通過 VBA 中的示例介紹如何在另一個 sub 中呼叫 sub。

在 VBA 中呼叫 Sub

在處理多個子過程時,我們可能會遇到需要為同一個函式呼叫多個子過程的情況。

有些函式需要編寫大量程式碼,並且要使這些程式碼易於理解;我們需要將它們分成多個部分。我們需要在單個子程式中呼叫這些部分,以確保整個過程以流線型的方式工作。

本教程將教我們在單個 sub 中呼叫多個 sub。讓我們通過一個示例,在該示例中,我們將獲取多個列的總和,然後獲取多個總和的總和,如下所示。

Sub sumOfA()
Dim result As Double
result = WorksheetFunction.Sum(Range("A2:A8"))
Range("A11") = "Sum Of A"
Range("A12") = result
End Sub
Sub sumOfB()
Dim result As Double
result = WorksheetFunction.Sum(Range("B2:B8"))
Range("B11") = "Sum Of B"
Range("B12") = result
End Sub
Sub totalSum()
Call sumOfA
Call sumOfB
Dim result As Double
result = WorksheetFunction.Sum(Range("A12:B12"))
Range("C11") = "Total Sum"
Range("C12") = result
End Sub

輸出:

在 VBA 中呼叫子示例

從上面的例子中我們可以看出,我們想要得到多列的總和,然後我們想要得到我們得到的總和的總和。為此,我們將程式碼分解為三個不同的子程式,並在最後一個子程式中呼叫這兩個子程式。

將程式碼分解為多個函式是一種使它們簡單易行的好習慣。