Direkt zum Inhalt

Ein VBA-Code zum Auflisten aller Add-Ins in Excel

In Excel können Sie einige Add-Ins hinzufügen oder einfügen, um besser mit Daten umgehen zu können. Wie wir wissen, können wir im Fenster "Optionen" alle Add-Ins anzeigen. Gibt es jedoch eine Möglichkeit, alle Add-Ins in einem Blatt aufzulisten? In diesem Lernprogramm wird nun ein VBA-Code zum Auflisten aller Add-Ins in Excel bereitgestellt.

1. Drücken Sie Alt + F11 Tasten zum Aktivieren des Fensters Microsoft Visual Basic für Applikationen.

2 Klicken Insert > Modulund fügen Sie den folgenden Code in das leere Skript ein.

VBA: Alle Add-Ins auflisten

Public Sub AllAddins()
'UpdatebyKutools20191031
Dim xWSh As Worksheet
Dim xWB As Workbook
Dim xAddin As AddIn
Dim xCOMAddin As COMAddIn
Dim xFA, xFCA As Integer
Dim xI As Integer
Dim xStr As String
 
On Error Resume Next
Application.DisplayAlerts = False
xStr = "Addins List"
Set xWB = Application.ActiveWorkbook
Set xWSh = xWB.Worksheets.Item(xStr)
If Not xWSh Is Nothing Then
    xWSh.Delete
End If
Set xWSh = xWB.Worksheets.Add
xWSh.Name = xStr
xWSh.Range("A1").Value = "Name"
xWSh.Range("B1").Value = "FullName"
xWSh.Range("C1").Value = "Installed"
For xFA = 1 To Application.AddIns.Count
    Set xAddin = Application.AddIns(xFA)
    xI = xFA + 1
    Range("A" & xI).Value = xAddin.Name
    Range("B" & xI).Value = xAddin.FullName
    Range("C" & xI).Value = xAddin.Installed
Next xFA
xFA = (xFA + 2)
xWSh.Range("A" & xFA).Value = "Description"
xWSh.Range("B" & xFA).Value = "progID"
xWSh.Range("C" & xFA).Value = "Connect"
For xFCA = 1 To Application.COMAddIns.Count
    xI = xFCA + xFA
    Set xCOMAddin = Application.COMAddIns(xFCA)
    Range("A" & xI).Value = xCOMAddin.Description
    Range("B" & xI).Value = xCOMAddin.progID
    Range("C" & xI).Value = xCOMAddin.Connect
Next xFCA
Application.DisplayAlerts = True
End Sub

doc liste alle add in 1

3. Drücken Sie F5 Als Schlüssel zum Ausführen des Codes wurde ein Blatt mit dem Namen Addins List mit allen Add-Ins erstellt.
doc liste alle add in 2


Sonstige Operationen (Artikel)

Deaktivieren Sie Add-Ins beim Start von Excel
Möglicherweise haben Sie einige Add-Ins in Microsoft Excel installiert, aber jetzt müssen Sie ein bestimmtes Add-In beim Start von Excel deaktivieren. Wie kann man dieses Problem lösen? Die Methode in diesem Artikel kann Ihnen helfen.

Exportieren und speichern Sie jedes Arbeitsblatt als separate neue Arbeitsmappe in Excel
Angenommen, Sie möchten ein oder mehrere Arbeitsblätter exportieren und als neue Arbeitsmappe speichern. Wie werden Sie damit umgehen? Normalerweise können Sie jedes Arbeitsblatt kopieren und in eine neue Arbeitsmappe einfügen. Aber hier bringen wir Ihnen einige nützliche Tricks, um damit umzugehen:

Fügen Sie Arbeitsblätter aus einer anderen Arbeitsmappe ein
Manchmal müssen Sie möglicherweise Arbeitsblätter aus anderen Arbeitsmappen importieren. Wenn Sie den Inhalt der Arbeitsblätter kopieren und in die aktuelle Arbeitsmappe einfügen, gehen einige Formatierungsstile verloren, z. B. Zeilenhöhe usw. In diesem Artikel werden einige praktische Möglichkeiten zum schnellen Einfügen von Arbeitsblättern aus anderen Arbeitsmappen mit Datenverlust und Formatierungsstilen beschrieben.


  • Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen und Speichern von Daten; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen und Summe / Durchschnitt... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Lieblingsformeln und schnell einfügen, Bereiche, Diagramme und Bilder; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Pivot-Tabellengruppierung nach Wochennummer, Wochentag und mehr ... Entsperrte, gesperrte Zellen anzeigen durch verschiedene Farben; Markieren Sie Zellen mit Formel / Name...
kte tab 201905
  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
officetab unten
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations