Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Find user form
Public Sub FindUserForm()
  
  Dim component As VBIDE.VBComponent
  Set component = Workbooks("Book1.xls").VBProject.VBComponents("UserForm1")
  MsgBox component.Name
End Sub