În acest fel, puteți afișa o listă macro-controlată a tuturor programelor de completare și puteți vedea imediat ce programe de completare sunt activate și care nu sunt
Doriți să interogați macrocontrolate care programe de completare sunt configurate pe un sistem? Acest lucru este util, de exemplu, pentru a vedea dacă utilizatorii au configurat toate programele de completare intenționate.
Puteți instala programe de completare pentru a extinde funcțiile Excel. Acestea sunt extensii de program care sunt configurate folosind Managerul de suplimente. Puteți găsi această comandă atunci când utilizați Excel până la versiunea 2003 prin meniul EXTRAS-ADD-INS.
Dacă utilizați Excel 2007, apelați această listă folosind butonul Office și apoi EXCELAȚI OPȚIUNI - ADAUTAȚI-VĂ.
Dacă utilizați Excel 2010, faceți clic pe FILE, apoi și pe OPȚIUNI și apoi pe ADD-INS - GO TO.
Dacă doriți să abordați lista dintr-o macro, utilizați obiectul AddIns. Următoarea macrocomandă afișează o listă cu toate programele de completare dintr-o nouă foaie de calcul Excel. Pentru fiecare intrare din listă, o valoare logică indică dacă suplimentul adecvat este instalat sau nu. Așa arată macro-ul:
Sub ShowAddIns ()
Dim i Integer
Cu Workbooks.Add.Worksheets (1)
Pentru i = 1 To AddIns.Count
.Cells (i + 1, 1) .Value = AddIns (i) .FullName
.Cells (i + 1, 2) .Value = AddIns (i) .Installed
Apoi eu
.Range ("a1: b1"). Value = Array ("Add-In", "Installed")
.Range ("a1: b1"). Font.Bold = True
.Range („a1: b1”). EntireColumn.AutoFit
Se termina cu
Sfârșitul Sub
Odată pornit, macrocomanda creează o listă de programe de completare. Următoarea ilustrație arată cum poate arăta această listă:
Utilizați proprietatea Name în loc de proprietatea FullName dacă nu doriți să citiți calea completă, ci doar numele fișierului programelor de completare.
Pentru a introduce macro-ul, apăsați combinația de taste ALT F11 în Excel. Aceasta cheamă editorul VBA. Utilizați comanda INSERT - MODULE pentru a insera o foaie de modul goală. Pentru a porni macro-ul, apăsați combinația de taste ALT F8 în Excel.
