在 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

输出：

从上面的例子中我们可以看出，我们想要得到多列的总和，然后我们想要得到我们得到的总和的总和。为此，我们将代码分解为三个不同的子程序，并在最后一个子程序中调用这两个子程序。

将代码分解为多个函数是一种使它们简单易行的好习惯。