Un code VBA pour lister tous les compléments dans Excel
Dans Excel, vous pouvez ajouter ou insérer certains compléments pour mieux manipuler 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 lister tous les compléments dans une feuille ? Maintenant, dans ce tutoriel, il fournit un code VBA pour lister tous les compléments dans Excel.
1. Appuyez sur Alt + F11 pour activer la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insérer > Module, puis collez le code ci-dessous dans le script vide.
VBA : Lister 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
3. Appuyez sur F5 pour exécuter le code ; une feuille nommée Liste des compléments a été créée avec tous les compléments.
Découvrez la magie d'Excel avec Kutools AI
- Exécution intelligente : Effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
- Formules personnalisées : Générez des formules adaptées pour rationaliser vos flux de travail.
- Codage VBA : Écrivez et implémentez du code VBA sans effort.
- Interprétation des formules : Comprenez facilement des formules complexes.
- Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.
Désactiver les compléments au démarrage d'Excel
Vous avez peut-être installé certains compléments dans votre Microsoft Excel, mais maintenant vous devez désactiver un complément spécifique au démarrage d'Excel. Comment résoudre ce problème ? La méthode décrite dans cet article peut vous aider.
Exporter et enregistrer chaque feuille de calcul sous forme de nouveau classeur distinct dans Excel
Disons que vous souhaitez exporter et enregistrer une ou plusieurs feuilles de calcul sous forme de nouveau classeur, comment allez-vous procéder ? Normalement, vous pourriez copier chaque feuille de calcul et coller dans un nouveau classeur. Mais ici, nous vous proposons quelques astuces pratiques pour y parvenir :
Insérer des feuilles de calcul depuis 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-le dans le classeur actuel, cela entraîne une perte de certains styles de mise en forme, tels que la hauteur des lignes, etc. Cet article décrit des méthodes pratiques pour insérer rapidement des feuilles de calcul à partir d'autres classeurs sans perdre de données ni styles de mise en forme.
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification 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é de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels