Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
我有一个临床医生将使用的医疗用户表单。有几个按钮可以让他们导航到不同的表单。我目前正在使用 Sub 进行多次检查以查看表单是否可见,如果是,则不要。但这对适应不是很友好。
我可以打电话来隐藏所有当前打开的可见表单。或者,循环浏览所有当前打开的表单(例如内存中的表单) 请求一个显然对我来说是懒惰的。请求两个就足够了,因为之后我可以编写代码来隐藏它们。
对于潜在的谷歌搜索
这是我需要的答案。这将隐藏所有打开的用户表单。
Dim UForm As Object For Each UForm In VBA.UserForms If UForm.Visible = True Then UForm.Hide End If Next