[Excel] Intreprêter du string en code

Bonjour à tous!

Je cherche à automatiser le lancement de macros contenus dans d'autres classeurs excel à travers un string. Pour être plus clair, voici un bout de code:

Code:

---

1 2 3 4

Dim Str As String Str = NomFichier + "!" + "test_MRP" 'Là Str vaut un string du genre NomdunFichier.xls!NomduneMacro Call Str

---

Il me faudrait donc une fonction capable d'interprêter "Str" comme du code et non un string.

Quelqu'un a une idée?
Merci!

bonjour

tu peux tester ce type de procedure

Code:

---

1 2 3

Dim Str As String Str = NomFichier + "!" + "test_MRP" Application.ExecuteExcel4Macro "RUN(""" & Str & """)"

---

bonne journée
michel

C'est ça merci!

Je viens juste de remarquer que le focus reste sur le nouveau fichier alors je viens de bousiller toutes mes données... :lol:
ça m'apprendra à pas sélectionner la bonne feuille avant d'écrire...

Merci!

[edit]En fait ça ne marche pas... Mais ce code là marche:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

'1) Ouvrir le classeur où se trouve la macro Workbooks.Open (NomCible)   '2) Application.Run "'NomFichier.xls'!NomMacro" Application.Run (NomCible + "!MRP_tot") Workbooks(NomFichierMRP).Activate Sheets("Principale").Select Cells(compteur, 4).Value = "Ok" compteur = compteur + 1   '3) Fermer le classeur en sauvant Workbooks(NomCible).Close Savechanges:=True

---

[/edit]