Excel VBA隐藏所有打开的用户表单

Cha*_*pot 3 excel vba excel-vba

我有临床医生将使用的医疗用户表格.有几个按钮可以让他们导航到不同的形式.我目前正在使用Sub进行多次检查以查看表单是否可见,如果是,则不要.但这对于适应并不是很友好.

是否可以进行调用以隐藏所有当前打开的可见表单.或者,循环浏览所有当前打开的表单(例如内存中的表单)请求一个对我来说显然是懒惰的.请求两个就足够了,因为我可以在那之后执行代码隐藏它们.

Cha*_*pot 7

对于潜在的谷歌搜索

这就是我需要的答案.这将隐藏任何打开的用户表单.

Dim UForm As Object

For Each UForm In VBA.UserForms 

    If UForm.Visible = True Then
        UForm.Hide
    End If

Next
Run Code Online (Sandbox Code Playgroud)