Sie wollen sich alle vorhandenen bzw. installierten Add-Ins in einem Tabellenblatt auflisten lassen?
Für diese Aufgabenstellung können Sie das folgende Makro in Excel einsetzen:
Sub ZeigeAddIn_Liste()
Dim i As Integer
With Workbooks.Add.Worksheets(1)
For i = 1 To AddIns.Count
.Cells(i + 1, 1).Value = AddIns(i).Title
.Cells(i + 1, 2).Value = AddIns(i).Name
.Cells(i + 1, 3).Value = AddIns(i).Path
.Cells(i + 1, 4).Value = AddIns(i).Installed
Next i
.Range(“a1:d1”).Value = Array(“Titel”, “Name”, “Pfad”, “Installiert”)
.Range(“a1:d1”).Font.Bold = True
.Range(“a1:d1”).EntireColumn.AutoFit
End With
End Sub