在 VBA 中调用 Sub
作者:迹忆客
最近更新:2023/03/19
浏览次数:
我们将通过 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
输出:
从上面的例子中我们可以看出,我们想要得到多列的总和,然后我们想要得到我们得到的总和的总和。为此,我们将代码分解为三个不同的子程序,并在最后一个子程序中调用这两个子程序。
将代码分解为多个函数是一种使它们简单易行的好习惯。