Vytvořte seznam všech doplňků aplikace Excel pomocí makra VBA

Obsah

Tímto způsobem si můžete zobrazit seznam všech doplňků ovládaných makro a okamžitě vidět, které doplňky jsou zapnuté a které nikoli

Chcete se zeptat na makro řízené doplňky, které jsou nastaveny v systému? To je užitečné například pro zjištění, zda uživatelé nastavili všechny zamýšlené doplňky.

Chcete-li rozšířit funkce aplikace Excel, můžete nainstalovat doplňky. Jedná se o rozšíření programu, která se nastavují pomocí Správce doplňků. Tento příkaz najdete při používání Excelu až do verze 2003 prostřednictvím nabídky EXTRAS-ADD-INS.

Pokud používáte Excel 2007, vyvolejte si tento seznam pomocí tlačítka Office a poté EXCEL OPTIONS - ADD -INS - GO TO.

Pokud používáte Excel 2010, klikněte na SOUBOR, poté také na MOŽNOSTI a poté na PŘIDAT -INS - PŘEJÍT NA.

Pokud chcete seznam adresovat z makra, použijte objekt AddIns. Následující makro zobrazuje seznam všech doplňků v nové tabulce aplikace Excel. U každé položky v seznamu logická hodnota udává, zda je příslušný doplněk nainstalován nebo ne. Makro vypadá takto:

Sub ShowAddIns ()
Dim i As Integer
S Workbooks.Add.Worksheets (1)
Pro i = 1 do AddIns.Count
.Cells (i + 1, 1) .Value = AddIns (i) .FullName
.Celky (i + 1, 2). Hodnota = AddIns (i). Instalováno
Příště já
.Range ("a1: b1"). Value = Array ("Add-In", "Installed")
.Range ("a1: b1"). Font.Bold = True
.Range ("a1: b1"). EntireColumn.AutoFit
Konec s
End Sub

Po spuštění vytvoří makro seznam doplňků. Následující obrázek ukazuje, jak může tento seznam vypadat:

Pokud nechcete číst úplnou cestu, ale pouze název souboru doplňků, použijte vlastnost Název místo vlastnosti FullName.

Makro zadáte stisknutím kombinace kláves ALT F11 v Excelu. Tím se vyvolá editor VBA. Pomocí příkazu VLOŽIT - MODUL vložte prázdný list modulu. Makro spustíte stisknutím kombinace kláves ALT F8 v Excelu.

Vám pomůže rozvoji místa, sdílet stránku s přáteli

wave wave wave wave wave