Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Get active project name
Public Sub ActiveProject()
  Dim project As VBIDE.VBProject
  Set project = Application.VBE.ActiveVBProject
  MsgBox project.Filename
End Sub