浏览工作簿的所有用户表单

Sof*_*mur 4 excel vba excel-vba

我想编写一个VBA程序,该程序在工作簿中打印所有用户窗体的名称。

例如,如果工作簿具有名为的用户表单frmHello。我只想打印UserForm: frmHello

在此处输入图片说明

有谁知道哪个集合与用户表单有关,以及如何找到用户表单的名称?

Dmi*_*liv 5

这对我有用:

Dim c As Object
For Each c In ThisWorkbook.VBProject.VBComponents
     If c.Type = 3 Then
         MsgBox c.Name
     End If
Next
Run Code Online (Sandbox Code Playgroud)

  • 请注意,此操作(如果不在外接程序中)需要附加的安全权限(Excel选项>信任中心>宏设置>信任对VBA Project对象模型的访问) (4认同)