Discussion :

[jnauche]

Bonjour,

Ce poste semble répondre parfaitement a mon besoin :
Je souhaite récupérer dans une macro word une variable qui provient d'une macro excel.

Voici mon bout de code coté Excel qui lance

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Set WrdApp = CreateObject("Word.Application")
Set WrdDoc = WrdApp.Documents.Open(Sheets("DonnéesFixes").Cells(10, 2) & "\Modèle BC.docm")
WrdApp.Visible = True
DoEvents
Valeur = "coucou"
WrdApp.Run "Publipostage"
'WrdDoc.Publipostage (Valeur)

Comme vous pouvez le voir, jusqu'à présent, je lance ma macro Word "Publipostage" avec l'instruction
WrdApp.Run "Publipostage" mais je n'arrive pas a passer de paramètre.
Alors j'ai tenté WrdDoc.Publipostage (Valeur) comme vous l'indiquez mais la macro ne se lance pas "Erreur définie par l'application ou l'objet".

Dernière précision, voici le début de code coté macro Word :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub Publipostage(Valeur)
 
MsgBox Valeur

Merci pour votre aide

[parmi]

Bonjour,

Ça peut dépendre du type du paramètre (numérique ou chaîne)
J'essaierais comme ceci pour voir.
Attention aux guillemets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
WrdApp.Run "'Publipostage " & VariableNumérique & "'"
ou 
WrdApp.Run "'Publipostage """ & VariableString & """'"

[jnauche]

Bonjour,


J'ai testé ceci

Excel

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Valeur = "coucou"
Wrdapp.Run "'publi """ & Valeur & """'"

Word

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sub publi(Valeur)
MsgBox Valeur

C'est un échec mais le message d'erreur change, "impossible de lancer la macro spécifiée"...
Est ce bon signe?

Merci pour votre aide.

[parmi]

Mon idée n'était pas bonne, finalement...
Je viens de faire un test. Essaie comme ceci.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Wrdapp.Run "publi", Valeur

[jnauche]

Merci!!!
C'était tellement simple finalement, mais quand tu n'as pas la bonne syntaxe, dur de l'inventer.
Merci encore pour ton aide.