在Excel中使用VBA编程时，我们经常需要将多个变量传递给一个执行特定操作的子程序或函数。这可以通过使用.OnAction方法来实现。.OnAction方法允许我们将一个宏与一个控件（如按钮或菜单项）关联并在点击该控件时执行该宏。通过传递多个变量给.OnAction方法，我们可以根据需要来定制宏的行为。
在VBA中，我们可以使用以下语法将多个变量传递给.OnAction方法：vba.OnAction = "MacroName " & Variable1 & ", " & Variable2在这个语法中，"MacroName"是要执行的宏的名称，Variable1和Variable2是要传递给宏的变量。现在，让我们通过一个具体的案例来说明如何将多个变量传递给.OnAction方法。假设我们有一个Excel工作簿，其中包含一个按钮，点击该按钮时会执行一个宏来自动计算两个数字的和。我们想要将两个数字作为变量传递给这个宏。首先，我们需要在工作簿中插入一个按钮。在“开发工具”选项卡中，点击“插入”按钮，选择“按钮”控件，并在工作表上绘制一个按钮。接下来，我们需要为按钮编写宏来执行计算。在VBA编辑器中，我们创建一个名为"CalculateSum"的宏，并将其与按钮的.OnAction属性关联起来。下面是完整的代码示例：
vbaSub CalculateSum(Variable1 As Integer, Variable2 As Integer) Dim Sum As Integer Sum = Variable1 + Variable2 MsgBox "The sum is: " & SumEnd SubSub AssignMacroToButton() Dim Variable1 As Integer Dim Variable2 As Integer Variable1 = 10 Variable2 = 20 ThisWorkbook.Sheets("Sheet1").Shapes("Button 1").OnAction = "CalculateSum " & Variable1 & ", " & Variable2End Sub在这个例子中，我们定义了一个名为"CalculateSum"的宏，它接受两个整数型变量Variable1和Variable2作为输入。宏将这两个变量相加，并使用MsgBox函数显示结果。然后，我们创建了一个名为"AssignMacroToButton"的宏，并在其中将Variable1和Variable2的值分别设置为10和20。最后，我们使用.OnAction方法将"CalculateSum"宏与按钮关联并将Variable1和Variable2传递给宏。当我们点击按钮时，将会执行"CalculateSum"宏，并显示计算结果的消息框。在这个例子中，消息框将显示"30"，即10加上20的和。在本例中，我们成功地将多个变量传递给.OnAction方法，并根据需要定制了宏的行为。这种方法在Excel中的VBA编程中非常有用，可以帮助我们更好地控制宏的执行。