Comment exécuter une macro Excel avec paramètres depuis Word ?

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Comment exécuter une macro Excel avec paramètres depuis Word ?

Spok

Bonjour,

J'ai une macro Word 97 qui doit finir par lancer Excel 97 en ouvrant une feuille de calcul existante et exécuter la macro qu'elle contient en lui passant des paramètres.

J'utilise la commande Shell avec succès pour lancer Excel et ouvrir le document .xls mais je n'ai pas trouvé dans l'aide la syntaxe d'appel de la macro.

J'ai vu que le commutateur existe pour Word mais pas pour Excel.

Quelqu'un aurait-il une solution pour moi ?

(A part Auto_Open car je ne vois pas comment lui passer les paramètres).

Merci

---------------
Spok

Publicité

MagicBuzz

N'utilise pas shell, mais dans ta macro word, crée un objet excel qui va ouvrir le fichier. ainsi, les deux macros pourront communiquer.

Spok

Merci de ta réponse rapide.
Je me rends compte à quel point je suis nul car je ne vois pas ce que c'est que de créer depuis Word un objet Excel qui peut ouvrir un fichier, et encore moins comment les macros pourront communiquer.

Est-ce que tu peux m'aider (si c'est relativement simple) ou m'envoyer un exemple ?

Encore merci

---------------
Spok

MagicBuzz

Je viens de me faire chier à faire un exemple : (en fait, je l'avais jamais fait, j'avais aucune idée de comment faire )

Crée une macro dans Word :
Déjà, avant, dans "référence", coche "Microsoft Office Excel" ou un truc comme ça, afin de pouvoir utiliser Excel depuis ta macro Word.

Sub tatouille()
'
' tatouille Macro
' Macro created 05/01/2004 by MagicBuzz
'
Dim xls As Excel.Application
Dim wkb As Excel.Workbook

Set xls = New Excel.Application
xls.Visible = True

Set wkb = xls.Workbooks.Open("c:\toto.xls" )
wkb.Application.Run "fillCell", "prout"
wkb.Activate
End Sub

Et dans le fichier c:\toto.xls, crée la macro suivante :

Sub fillCell(val As String)
Sheet1.Cells(1, 1) = val
MsgBox (val)
End Sub

Micracle, la macro Excel récupère bien les paramètres de la macro Word

Message édité par MagicBuzz le 05-01-2004 à 16:20:38

Spok

Vraiment très sympa de m'avoir fourni cet exemple complet.
Je viens de le copier-coller, je ne comprends pas tout et je bute encore sur une erreur de compilation "Type défini par l'utilisateur non défini" ! Ce qui n'est pas très clair mais sur lequel je vais faire des recherches tout seul pour ne pas t'embèter plus longtemps. J'espère juste que ce n'est pas parceque je bosse avec la version 97...

A charge de revanche !?!

---------------
Spok

MagicBuzz

Dans l'éditeur VB de la macro Word, clique sur "outils > références" et ajoute "Microsoft Excel x.x Object Library"

MagicBuzz

PS: j'ai jamais fait de macro avec Office 97. Pour avoir porté des macros de Office 2000 vers Office 97, je sais que je me suis heurté à plusieurs problèmes. J'espère qu'Office 97 prends bien en charge ce système. Logiquement, oui.

Spok

Oui c'est ce que j'étais en train de faire pour finalement trouver Excel en fin de liste et en version 9.0 et maintenant cela fonctionne super bien...

Quand je pense que je cherchais depuis ce matin...

Merci mille fois !

---------------
Spok

thais781

Bonjour,

Je déterre ce post, je cherche a faire la meme chose mais d'Excel vers Word
Version Mac 2004

Mon code Dans Excel :

Code :

Sub GoToWord()
Set appWD = CreateObject("Word.Application" )
appWD.Visible = True
Set Docu = appWD.Documents.Open("Macintosh HD:Users:aristorcelli:Aiuta:19. DEV:MyWord.doc" )
appWD.Run "FromExcel", "Hello World"
End Sub

Mon code Dans Word :

Code :

Sub FromExcel(val As String)
MsgBox (val)
End Sub

et la bug au niveau appWD.Run "FromExcel", "Hello World", ne trouve pas la macro, par contra, sans l'arguments, pas de soucis....

Si vous avez une idée ?

Thais

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Comment exécuter une macro Excel avec paramètres depuis Word ?

Sujets relatifs
Visual Basic - programme à part ou Excel ?	Excel Property Range( cell1, cell2).select
[Macro Excel] imprimer/sauvegarder une feuille...	[asp.net sql] Executer un fichier .sql à partir d'une page .aspx
Sélection de feuille de calcul sous Excel (VBA)	Lignes saut de page vba excel
passage de paramètres entre 2 fenètres html	Lancer excel via mon exe c++ builder
ramener des paramètres OUT d'une procédure stockée Oracle
Plus de sujets relatifs à : Comment exécuter une macro Excel avec paramètres depuis Word ?

Page générée en 0.046 secondes