Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Find the selected component in VBIDE
Public Sub FindSelectedComponent()
  Dim component As VBIDE.VBComponent
  Set component = Application.VBE.SelectedVBComponent
  MsgBox component.Name
End Sub