Mega Code Archive

 

Categories / VisualBasic Script / Application

 

Get active project name

Public Sub ActiveProject()   Dim project As VBIDE.VBProject   Set project = Application.VBE.ActiveVBProject   MsgBox project.Filename End Sub