Excel VBA Userform到Module / sub

Question

所有

我正在努力将输入变量从用户表单传递给模块/子。我搜索了表单，但找不到匹配的示例。

E.g。

表单1：名为 TextBoxA 和 TextBoxB 的两个输入字段以及1 提交按钮。 第1单元：我想使用TextBoxA和TextBoxB

的输入变量的一些代码

用户形式中的代码：

Private Sub CommandButton1_Click()
    pass = myuserform.TextBoxA
End Sub

谁能指出我正确的方向。非常感谢。

Answer 1

设置一个方法，该方法接受标准模块中的两个参数，并将TextBox值作为参数传递：

Public Sub TestMethod(ByVal param1 As Variant, ByVal param2 As Variant)
    MsgBox "You passed: " & param1 & " and " & param2
End Sub

然后您只需要在按钮的Click事件中调用该方法：

Private Sub CommandButton1_Click()
    TestMethod myuserform.TextBoxA.Value, myuserform.TextBoxB.Value
End Sub