单击按钮后UserForm不会出现

Question

我为工作表创建了两个新的用户表单。制作完成后，我在excel页面添加了两个按钮。然后我设置了一个模块并放入

Sub Button4_Click()
Missing.Show
End Sub

现在我将宏指定给了按钮，当我点击按钮时，我收到“需要对象”错误。为什么这样，如果以上不起作用，我该怎么做才能让按钮实际打开usr表单？

Answer 1

好吧，我终于找到了问题所在。它实际上与按钮本身无关。 Missing.Show完美无缺。这实际上是表单初始化的一个问题;在某些时候我将初始化改为

Private Sub Missing_Initialize()
    TextBox.Value = ""
End Sub

当我真的应该把它留在

Private Sub UserForm2_Initialize()
    TextBox.Value = ""
End Sub

所以，显然，即使错误总是把我带到按钮代码，实际上是窗体的初始化引起了大惊小怪。希望这可以帮助其他有类似问题的人。

Answer 2

怎么样：

Private Sub Missing_Click()
Load Missing
Missing.Show
End Sub

Answer 3

由于您不在表单（类）模块之外，因此VBA不知道“Missing”指的是什么。你必须先实例化它。

Dim frm As Missing

Set frm = New Missing

Missing.Show

如果我可以补充一下，这不关我的事，但“Missing.Show”可能会令人困惑。我会避免使用看起来像关键字的变量。