Dieses Beispiel zeigt den Pfad und Dateinamen jedes verfügbaren Add-Ins an.
For Each a In AddIns MsgBox a.FullName Next a
Und dieses Beispiel zeigt Pfad und Dateinamen der aktiven Arbeitsmappe an (vorausgesetzt die Arbeitsmappe wurde gespeichert).
MsgBox ActiveWorkbook.FullName