Une macro unique pour plusieurs fichiers xlsx Résolu/Fermé

Question

Bonjour, 
J'ai une dizaines de fichiers xlsx dont la feuille de données principale contient plusieurs milliers de lignes et une vingtaine de colonnes. Tous les fichiers ont le même intitulé de colonne. J'ai écrit une macro sur un des fichiers et je veux l'appliquer aux autres sans avoir à recopier la macro dans tous les fichiers. Je vois en lisant les forums qu'on peut sauvegarder le fichier .xlsm en un fichier .xla. Du coup, Excel propose par défaut le répertoire \AppData\Roaming\microsoft\AddIns. Ensuite, dans options Excel, Compléments, Compléments Excel, Atteindre, je coche la boîte à cocher correspondant à ma macro, je sors d' Excel, je le redémarre et impossible de voir apparaître ma macro qui est censée être dans l'onglet "Données", pavé "Analysis" avec le Data Analysis et le solver. En faisant Alt F11, je vois bien la macro, je peux toujours l'exécuter en cliquant sur "Module 1" puis en cliquant sur la petite flèche verte (Exécuter Sub (F5)) mais n'y a-t-il pas une méthode plus ergonomique?  En tapant le nom de la macro dans le bandeau prévu à cet effet sur la fenêtre Alt F8, le bouton "Exécuter" reste gris. Je vous remercie de votre aide.
Nicolas


Configuration: Windows 7 / Firefox 43.0

Le Pingou · Answer

Bonjour,
Une solution est de mettre un bouton de commande sur la feuille de votre choix et de lui affecter la macro.

Le Pingou · Answer

Bonjour,
Je ne sais pas exactement ce que vous avez réalisé.
Je vous propose de regarder comment fonctionne l’exemple joint, Vous devez extraire le dossier global (il y a les classeurs nécessaire pour l’exemple)  et l’enregistrer sur votre bureau.
L’exemple : https://www.cjoint.com/c/FCbwbXi66gs
Vous ouvrez [Global] et ensuite le classeur [JPP_Accuil.xlsm] …. !
A voir pour la suite ….selon vos informations

Le Pingou · Answer

Bonjour,
En relisant votre demande, je constate que j’ai mal répondu, veillez m’en excuser.

Pour pouvoir exécuter une macro d'un autre classeur (ici .xla), il est nécessaire que ce dernier soit ouvert au préalable. 

Soit comme cela pour fichier xla ( mesMacro.xla)
Private Sub Workbook_Open()Application.Workbooks.Open "C:\Documents and Settings\users\Application Data\Microsoft\AddIns\mesMacro.xla "Application.Run "mesMacro.xla!NomDeLaMacro"End Sub

Le Pingou · Answer

Bonjour,
Merci, de rien, content pour vous.

Une macro unique pour plusieurs fichiers xlsx

4 réponses

Discussions similaires