OVH Cloud OVH Cloud

Excel et Word

3 réponses
Avatar
Olivier
Salut les boss !

Voici une question qui me laisse perplexe : J'écris une macro sous VBA
Excel, macro qui doit exécuter quelques actions dans Word. D'après mes
périgrinations sur la toile, on me dit de créer une variable objet que j'ai
appelé appWord et de la définir de la manière suivante :

Sub Continuer()
Dim appWord As Object
Set appWord = New Word.Application
...
End Sub

Le problème, c'est que quand j'exécute la macro, VBA me renvoit le message
"User-defined Type not defined"... Après quelques recherches, j'ai vérifié
dans VBA sous Word dans le menu Outils/Références que l'option Microsoft Word
9.0 Object Library est bien sélectionné, ce qui est le cas...

Je reste donc sans réponse. Qui pourra m'aider ???

3 réponses

Avatar
Clément Marcotte
Bonjour,

Si ta macro part d'Excel, il faut que tu coches la référence à la
bibliothèque Word dans Excel également.

Si tu ne veux pas avoir à cocher, tu peux remplacer :

Set appWord = New Word.Application


par:

set appWord = Createobject("word.application")


"Olivier" a écrit dans le message de
news:
Salut les boss !

Voici une question qui me laisse perplexe : J'écris une macro sous VBA
Excel, macro qui doit exécuter quelques actions dans Word. D'après mes
périgrinations sur la toile, on me dit de créer une variable objet que
j'ai
appelé appWord et de la définir de la manière suivante :

Sub Continuer()
Dim appWord As Object
...
End Sub

Le problème, c'est que quand j'exécute la macro, VBA me renvoit le message
"User-defined Type not defined"... Après quelques recherches, j'ai vérifié
dans VBA sous Word dans le menu Outils/Références que l'option Microsoft
Word
9.0 Object Library est bien sélectionné, ce qui est le cas...

Je reste donc sans réponse. Qui pourra m'aider ???


Avatar
JLuc
Clément Marcotte avait soumis l'idée :
Bonjour,

Si ta macro part d'Excel, il faut que tu coches la référence à la
bibliothèque Word dans Excel également.

Si tu ne veux pas avoir à cocher, tu peux remplacer :

Set appWord = New Word.Application


par:

set appWord = Createobject("word.application")


Et en complement :

Dim appWord As Word.Application 'et pas Objet

--
JLuc


Avatar
Olivier
Merci beaucoup à tous les deux ! Cà marche !!!
"JLuc" wrote:

Clément Marcotte avait soumis l'idée :
Bonjour,

Si ta macro part d'Excel, il faut que tu coches la référence à la
bibliothèque Word dans Excel également.

Si tu ne veux pas avoir à cocher, tu peux remplacer :

Set appWord = New Word.Application


par:

set appWord = Createobject("word.application")


Et en complement :

Dim appWord As Word.Application 'et pas Objet

--
JLuc