Executer une macro

[Jean-yves]

Bonjour,

J'aimerais qu'une macro exécute une autre macro (ici Analyse Mesures) située dans un autre classeur (ici r1-air).

J'ai essayé ceci :

Workbooks.Open Filename:=ThisWorkbook.Path & '\\r1-air.XLS'
Application.Run ('r1-air!AnalyseMesures')

Malheureusement, ca plante lors de l'éxécution.

Avis aux amateurs...

Merci

 

[MichelXld]

bonjour Jean-Yves

que veux tu dire par 'ça plante' ?
que ce passe t'il lorsque tu lances la procedure?
tu as un message d'erreur?
si oui lequel?

est ce que la macro à déclencher est dans un module ?


tu peux essayer cette synthaxe

Run 'r1-air.XLS!Module1.macroTest'


bonne journée
MichelXld

 

[Jean-yves]

Bonjour Michel,

j'ai essayé ta syntaxe mais je ne parviens pas à la faire fonctionner.
Que représente le 'module 1' dans cette syntaxe?

En ce qui concerne l'erreur affichée, il s'agit de l'erreur 1004 me signalant qu'il est impossible de trouver la macro.

J'ai pourtant bien vérifier que la macro (que je tente d'éxecuter) soit enregistrée dans le bon classeur mais rien n'y fait.

Merci.

 

[MichelXld]

bonjour Jean-Yves

j'ai essayé ta syntaxe mais je ne parviens pas à la faire fonctionner.
Que représente le 'module 1' dans cette syntaxe?

???

Module1 est le nom du module qui contient la macro 'macroTest'



bonne journée
MichelXld

 

[Jean-Yves]

re-bonjour Michel,

je pense avoir bien suivi ta syntaxe (voir ci-dessous) mais malheureusement j'ai toujours la même erreur.

Workbooks.Open Filename:=ThisWorkbook.Path & '\\r1-air.XLS'
Run 'r1-air.XLS!Module1.AnalyseMesures'

a+

 

[Jean-yves]

Je crois que j'ai trouvé pourquoi ca ne marchait pas.

La syntaxe que j'ai mise est :

Run (''r1-air.xls'!Module1.AnalyseMesures')

Les paranthèses peuvent être bougées mais il semble que les ' de part et d'autre de r1-air.xls soient nécessaires

Merci pour tout et bonne journée

 

[MichelXld]

rebonjour

oui sans doute à cause du caractere special tiret (-) dans le nom du classeur ...


bonne journée
MichelXld