VBA，用于更改代码中关键字的用户窗体

Question

以前从未做过任何用户表单，但是有没有办法创建一个 form/button/cells，当你填写它们时，它 replaces/changes 我的 vba 代码中的搜索词？

  ' Find the Node column
            intColNode = 0
            On Error Resume Next
            intColNode = WorksheetFunction.Match("Node", .Rows(1), 0)
            On Error GoTo 0

示例是将单词 "Node" 替换为用户输入的内容。我如何创建一个表单，电子表格的用户可以在其中根据需要的口味更改关键字。

如有任何帮助，我们将不胜感激

Answer 1

为用户输入声明一个变量。在这种情况下，文本框应该可以解决问题，然后有一个 Submit 按钮（用户窗体工具箱中的命令按钮）运行您的代码，如下所示：

Private Sub CommandButton1_Click()

Dim uVal as String
uVal = Userform1.Textbox1.Value

intColNode = 0
On Error Resume Next
intColNode = WorksheetFunction.Match(uVal, .Rows(1), 0)
On Error GoTo 0

Unload Me

End Sub

Good page for learning how to create a UserForm

Answer 2

我为另一个似乎符合您需求的答案提供了一些代码：

基本上，当用户在一个字段 (SeatNo) 中键入一个值时，其他字段将更新为同一行中的值。

VBA，用于更改代码中关键字的用户窗体

VBA, Userform to alter keyword in code

excel

vba

userform