Appeler une macro d'un autre classeur avec une variable en paramètre
Bonjour,
Je tente d'appeler une macro d'un autre classeur avec une variable en paramètre mais n'y parviens pas.
Le nom du classeur appelé dans lequel est la macro appelée est:
Code:
CLM_CLD_CITIS XXXX.xlsm
;
Il est ouvert quand je travaille mais au cas où, son chemin:
Code:
C:\Users\XXXX\Desktop\XXX\EXCEL\CLM_CLD_CITIS\
;
La macro: ;
Le paramètres: (qui est une string renseignée dans le classeur A, une suite de NOM prénoms séparés par des ";" que je souhaite transformer un tableau avec dans le classeur B pour traitement dans une boucle)
le code que je tente d'utiliser:
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
|
Public Qui As String
Public Sub EnvoiMail()
If UserForm3.TextBox1.Value <> "" And UserForm3.TextBox2.Value = "" Then
Qui = UserForm3.TextBox1.Value
End If
If UserForm3.TextBox1.Value = "" And UserForm3.TextBox2.Value <> "" Then
Qui = UserForm3.TextBox2.Value
End If
LaMAcro = "(" & "C:\Users\XXXX\Desktop\XXX\EXCEL\CLM_CLD_CITIS\" & Workbooks("CLM_CLD_CITIS XXXX.xlsm").Name & "!'RecupParams," & Qui & ")"
Debug.Print LaMAcro
Application.Run LaMAcro
End Sub |
Le dernier debug.print que j'ai obtenu:
Code:
(C:\Users\XXXX\Desktop\DPE\EXCEL\CLM_CLD_CITIS\CLM_CLD_CITIS XXXX.xlsm!'RecupParams,Personne1;Personne2)
Code:
Personne1 et Personne2
sont les NOM Prénom que je souhaite récupérer dans la macro du classeur B.
Plantage sur la ligne:
Code:
Application.Run LaMAcro
Erreur:
Code:
Erreur d'exécution 1004 La métode Run de l'objet _Application a échoué
Quel est mon erreur?
Merci beaucoup d'avance du coup de main!!!!