enchainement macros

[cyrus55160]

Bonjour,

J'ai un petit souci sur l'enchainement de macros :

Depuis un bouton de commande je lance la procédure suivante :

Sub bton_qd_click()

Workbooks.openfilename:= "ffichier à ouvrir"
application.run "une macro dans le fichier"

Workbooks.openfilename:= "ffichier à ouvrir2"
application.run "une macro dans le fichier2"

Workbooks.openfilename:= "ffichier à ouvrir3"
application.run "une macro dans le fichier3"

Workbooks.openfilename:= "ffichier à ouvrir4"
application.run "une macro dans le fichier4"

End sub
Pour le premier fichier cela marche bien, mais il n'enchaine pas sur les suivants.
Je ne vois pas quel est le problème?

Merci

 

[Larson]

Re : enchainement macros

Bonjour,

sans savoir ce que font les macros (la 1ere pour commencer), difficile de repondre ....

on peut imaginer qu'elle ferme excel !!!

 

[cyrus55160]

Re : enchainement macros

Re,

Non la macro ne ferme pas excel, elle ouvre un fichier realise plusieurs actions et referme le fichier.
La macro se trouve dans un fichier qui reste ouvert.