Excel VBA 用户表单到模块/子答案

【问题标题】：Excel VBA Userform to Module/subExcel VBA 用户表单到模块/子
【发布时间】：2017-10-04 15:36:53
【问题描述】：

全部，

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

例如

表格 1：两个输入字段分别名为 TextBoxA 和 TextBoxB 以及 1 个 提交按钮。 模块 1：我想在其中使用 TextBoxA 和 TextBoxB 的输入变量的一些代码

用户表单中的代码：

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

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

【问题讨论】：

如果 pass 是您想从标准模块访问的变量，您只需在标准模块上将 pass 作为公共变量声明为“Public pass as String”，这样一旦您分配了一个用户窗体上的传递变量的值，它可以在标准模块上的任何子例程中访问
此处的示例：mrexcel.com/forum/excel-questions/…

【解决方案1】：

在标准模块中设置一个接受两个参数并将文本框值作为参数传递的方法：

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

【讨论】：