单击用户窗体上的事件处理程序

Question

当在 ListBox 对象外部注册单击时，我想在 Excel 用户窗体中隐藏 ListBox 对象。所以我想我在用户窗体上使用了 Click 或 MouseUp 事件，但两者似乎都不起作用。有什么方法可以实现此功能？

到目前为止我尝试过的：

Sub TestUserForm_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)    
     If ListBoxSearch.Visible = True Then    
        ListBoxSearch.Visible = False    
     End If    
End Sub

并且：

Sub TestUserForm_Click()    
     If ListBoxSearch.Visible = True Then    
        ListBoxSearch.Visible = False    
     End If    
End Sub

两个事件都没有触发。

Answer 1

应该是这样的：

Sub UserForm_Click()    
     If ListBoxSearch.Visible = True Then    
        ListBoxSearch.Visible = False    
     End If    
End Sub

您没有使用表单的实际名称来访问其事件。如果您在设计模式下双击表单，它将为您创建适当的事件。

单击用户窗体上的事件处理程序

Click event handler on Userform

excel

vba

excel-addins