Skapa en lista över alla Excel-tillägg med ett VBA-makro

Innehållsförteckning

På så sätt kan du visa en makrostyrd lista över alla tillägg och omedelbart se vilka tillägg som är påslagna och vilka som inte är

Vill du fråga makrostyrda vilka tillägg som är installerade på ett system? Detta är till exempel användbart för att se om användarna har konfigurerat alla avsedda tillägg.

Du kan installera tillägg för att utöka Excel-funktionerna. Det här är programtillägg som konfigureras med tilläggshanteraren. Du hittar det här kommandot när du använder Excel fram till version 2003 via menyn EXTRAS-ADD-INS.

Om du använder Excel 2007, öppna den här listan med Office -knappen och sedan EXCEL ALTERNATIV - ADD -INS - GO TO.

Om du använder Excel 2010 klickar du på FIL, sedan även OPTIONS och sedan på ADD -INS - GO TO.

Om du vill ta upp listan från ett makro använder du AddIns -objektet. Följande makro visar en lista över alla tillägg i ett nytt Excel-kalkylblad. För varje post i listan anger ett logiskt värde om rätt tillägg är installerat eller inte. Så här ser makrot ut:

Sub ShowAddIns ()
Dim i As Integer
Med Workbooks.Add.Worksheets (1)
För i = 1 Till AddIns.Count
.Cells (i + 1, 1) .Value = AddIns (i) .FullName
.Celler (i + 1, 2) .Value = AddIns (i) .Installerat
Nästa i
.Range ("a1: b1"). Value = Array ("Add-In", "Installed")
.Range ("a1: b1"). Font.Bold = True
.Range ("a1: b1"). EntireColumn.AutoFit
Sluta med
Avsluta Sub

När det har startat skapar makrot en lista över tilläggen. Följande illustration visar hur den här listan kan se ut:

Använd egenskapen Namn istället för egenskapen Fullnamn om du inte vill läsa hela sökvägen utan bara filnamnet på tilläggen.

För att gå in i makrot, tryck på tangentkombinationen ALT F11 i Excel. Detta kallar upp VBA -redaktören. Använd kommandot INSERT - MODULE för att infoga ett tomt modulark. För att starta makrot, tryck på tangentkombinationen ALT F8 i Excel.

Du kommer att bidra till utvecklingen av webbplatsen, dela sidan med dina vänner

wave wave wave wave wave