La commande Macros complémentaires du menu Outils se révèle très lente. Même avec un PC rapide, l’affichage de la liste des macros complémentaires disponibles peut se faire attendre plusieurs dizaines de secondes voire deux ou trois minutes. En effet, Excel ne se contente pas de fournir un récapitulatif des modules additionnels, il en profite également pour installer ceux ayant été choisis lors des dernières sessions. Cette procédure d’installation se répète chaque fois que l’on fait appel à cette commande. Pour obtenir instantanément la liste des macros complémentaires installées sans perdre de précieuses secondes, écrivez un programme en VBA (Visual Basic édition Applications), le langage de programmation intégré au tableur. Cliquez sur Outils/Macros/Visual Basic Editor. Créez une fenêtre de dialogue (Insertion/Userform). Exécutez la commande Fenêtre Propriétés du menu Affichage. Sélectionnez le formulaire et saisissez BoiteDialogue dans le champ (Name) de la fenêtre des propriétés. Cliquez sur le formulaire et choisissez une zone de liste (ListBox) dans la fenêtre Boîte à outils. Dessinez un cadre dans le formulaire. Dans le champ (Name) de la fenêtre des propriétés, entrez ListeMacros. Insérez un module en cliquant sur Insertion/Module, recopiez le listing ci-dessous. Exécutez la commande Outils/Macros/Macros. Sélectionnez AfficheMacros et activez [exécuter]. La procédure exploite l’objet AddIns, une sorte de table interne regroupant les informations sur les macros complémentaires.Listing :
Sub AfficheMacros()
Dim nb As Integer
BoiteDialogue.ListeMacros.Clear
For nb = 1 To AddIns.Count
If AddIns(nb).Installed Then
Call BoiteDialogue.ListeMacros.AddItem(AddIns(nb).Title)
End If
Next nb
BoiteDialogue.Show
End Sub
🔴 Pour ne manquer aucune actualité de 01net, suivez-nous sur Google Actualités et WhatsApp.
