Pb sous VBA (urgent)
charly2812
-
Lupin.A -
Lupin.A -
Pb sous vba.
alors voila le topo:
j'ai un premier classeur dans lequel j'ai une commande VBA (commandbuton1_click()) qui me permet de faire une actualisation d'une feuille.
j'ai 7 autres classeurs identiques avec a chaque fois la meme commande.
je voudrais a l'aide d'un autre classeur regrouper l'execution des commandes sur un seul bouton, cad qu'en appuyant sur le bouton j'ouvre les 8 fichiers puis j'execute les commandes d'actualisation. pas de probleme pour ouvrir les fichiers, mais je ne sais pas comment faire pour le bouton ultime!!!
merci de votre aide.
alors voila le topo:
j'ai un premier classeur dans lequel j'ai une commande VBA (commandbuton1_click()) qui me permet de faire une actualisation d'une feuille.
j'ai 7 autres classeurs identiques avec a chaque fois la meme commande.
je voudrais a l'aide d'un autre classeur regrouper l'execution des commandes sur un seul bouton, cad qu'en appuyant sur le bouton j'ouvre les 8 fichiers puis j'execute les commandes d'actualisation. pas de probleme pour ouvrir les fichiers, mais je ne sais pas comment faire pour le bouton ultime!!!
merci de votre aide.
A voir également:
- Pb sous VBA (urgent)
- Excel compter cellule couleur sans vba - Guide
- Incompatibilité de type vba ✓ - Forum VB / VBA
- Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
- Mkdir vba ✓ - Forum VB / VBA
- Dépassement de capacité vba ✓ - Forum Excel
2 réponses
Bonjour,
Une fois le fichier maitre ouvert ( i.e. a l'aide d'un autre classeur ), utiliser l'instruction :
Application.Run "Fichier_1.xls!Module1.Routine_Test"
et ainsi de suite pour les autres classeurs :
Application.Run "Fichier_2.xls!Module1.Routine_Test"
Application.Run "Fichier_3.xls!Module1.Routine_Test"
Application.Run "Fichier_4.xls!Module1.Routine_Test"
Application.Run "Fichier_5.xls!Module1.Routine_Test"
Application.Run "Fichier_6.xls!Module1.Routine_Test"
Application.Run "Fichier_7.xls!Module1.Routine_Test"
Application.Run "Fichier_8.xls!Module1.Routine_Test"
Si le bouton est sur une feuille :
Application.Run "Lien2.xls!Feuil1.CommandButton1_Click"
Lupin
Une fois le fichier maitre ouvert ( i.e. a l'aide d'un autre classeur ), utiliser l'instruction :
Application.Run "Fichier_1.xls!Module1.Routine_Test"
et ainsi de suite pour les autres classeurs :
Application.Run "Fichier_2.xls!Module1.Routine_Test"
Application.Run "Fichier_3.xls!Module1.Routine_Test"
Application.Run "Fichier_4.xls!Module1.Routine_Test"
Application.Run "Fichier_5.xls!Module1.Routine_Test"
Application.Run "Fichier_6.xls!Module1.Routine_Test"
Application.Run "Fichier_7.xls!Module1.Routine_Test"
Application.Run "Fichier_8.xls!Module1.Routine_Test"
Si le bouton est sur une feuille :
Application.Run "Lien2.xls!Feuil1.CommandButton1_Click"
Lupin
