Passer au contenu principal

Un code VBA pour lister tous les compléments dans Excel

Dans Excel, vous pouvez ajouter ou insérer des compléments pour mieux gérer les données. Comme nous le savons, nous pouvons accéder à la fenêtre Options pour afficher tous les compléments, mais existe-t-il un moyen de répertorier tous les compléments dans une feuille? Maintenant, dans ce didacticiel, il fournit un code VBA pour répertorier tous les compléments dans Excel.

1. presse Alt + F11 pour activer la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez insérer > Moduleet collez le code ci-dessous dans le script vide.

VBA: liste tous les compléments

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 list tout ajouter en 1

3. presse F5 clé pour exécuter le code, une feuille nommée Liste des compléments a été créée avec tous les compléments.
doc list tout ajouter en 2


Autres opérations (articles)

Désactiver les compléments au démarrage d'Excel
Vous avez peut-être installé des compléments dans votre Microsoft Excel, mais vous devez maintenant désactiver un complément spécifié au démarrage d'Excel. Comment résoudre ce problème? La méthode de cet article peut vous aider.

Exportez et enregistrez chaque feuille de calcul en tant que nouveau classeur distinct dans Excel
Supposons que vous souhaitiez exporter et enregistrer une ou plusieurs feuilles de calcul en tant que nouveau classeur, comment allez-vous le gérer? Normalement, vous pouvez copier chaque feuille de calcul et la coller dans un nouveau classeur. Mais ici, nous vous apportons quelques astuces pratiques pour y faire face:

Insérer des feuilles de calcul à partir d'un autre classeur
Parfois, vous devrez peut-être importer des feuilles de calcul à partir d'autres classeurs. Si vous copiez le contenu des feuilles de calcul et collez dans le classeur actuel, certains styles de mise en forme, tels que la hauteur de ligne, etc., perdent certains styles de mise en forme, etc.


  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée
  • Fusionner les cellules / lignes / colonnes et conservation des données; Contenu des cellules divisées; Combiner les lignes en double et la somme / moyenne... Empêcher les cellules en double; Comparer les gammes
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Formules favorites et insérer rapidement, Plages, graphiques et images; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF
  • Regroupement du tableau croisé dynamique par numéro de semaine, jour de la semaine et plus encore ... Afficher les cellules déverrouillées et verrouillées par différentes couleurs; Mettre en évidence les cellules qui ont une formule / un nom
onglet kte 201905
  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
bas de cabine
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