我希望在ListBox对象外部注册单击时隐藏Excel用户窗体中的ListBox对象。所以我想我在UserForm上使用了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
这两件事都没有发生。
答案 0 :(得分:4)
应该是这样的:
Sub UserForm_Click()
If ListBoxSearch.Visible = True Then
ListBoxSearch.Visible = False
End If
End Sub
您不使用表单的实际名称来访问其事件。如果您在设计模式中双击表单,它将为您创建适当的事件。