Excel 在另一个子系统中调用多个变量

当我试图在另一个子例程中使用在子例程中创建的变量时，我遇到了一个问题。 在下面的示例中，我创建变量Power\u Origine、Power\u Destination、。。。在Subpart0中，我可以在Subpart1中使用其中一个变量，但我不能在单个子例程中使用多个变量（part2）

如何在子例程第2部分中调用这4个变量（Power\u Origine、Power\u Destination、Description\u Destination、knowuser\u Destination）

多谢各位

但是我不能在一个子例程中使用超过1个变量（第2部分）

你可以。只需删除

（

和

）

。所以它变成了

part2 Power_Origine, Power_Destination, Description_Destination, KnownUser_Destination 

或使用

Call part2(Power_Origine, Power_Destination, Description_Destination, KnownUser_Destination)

和上面一样。由于在

part02

中声明了

Power\u Origine为整数，Power\u Destination为整数，Description\u Destination为整数，knowuser\u Destination为整数，因此仍可能会出现错误，但在
part0
中，它们是
变体。在
part0
中将它们声明为
Integer
，它将起作用：）

你可能还想读一读
这正是我想要的！非常感谢。
Call part2(Power_Origine, Power_Destination, Description_Destination, KnownUser_Destination)

Sub part0()
    Dim Power_Origine As Integer
    Dim Description_Origine  As Integer
    Dim KnownUser_Origine  As Integer
    Dim Power_Destination  As Integer
    Dim Description_Destination As Integer
    Dim KnownUser_Destination  As Integer

    Power_Origine = 1
    Description_Origine = 2
    KnownUser_Origine = 3
    Power_Destination = 1
    Description_Destination = 2
    KnownUser_Destination = 3

    part1 Power_Destination
    part2 Power_Origine, Power_Destination, Description_Destination, KnownUser_Destination
End Sub

Sub part1(Power_Destination As Integer)
    MsgBox Power_Destination
End Sub

Sub part2(P_Orig As Integer, P_Dest As Integer, D_Dest As Integer, K_Dest As Integer)
    MsgBox "Hello " & P_Dest & D_Dest
End Sub