OVH Cloud OVH Cloud

Word à partir d'une macro Excel

1 réponse
Avatar
Jean-Luc CAPEL
Bonjour à tous,

J'essaye d'ouvrir et de fermer à la suite des fichiers Word (*.doc) à partir
d'une procédure VBA Excel afin de récupérer des données dans chacun des
documents.
j'utilise pour cela les commandes suivantes :

'Créer une session Microsoft Word
Set wdApp = CreateObject("word.application")

'Rendre le document visible
wdApp.Visible = False

...

L'application Word s'ouvre bien visuellement ainsi que tous les fichiers
Word. Cependant je pense que le raffraichissement de l'écran est une perte
de temps CPU.
Y aurait il un myen de cacher l'ouverture de l'application word et/ou
l'ouverture de tous ces fichiers Word qui "rebondissent".

J'ai éssayé la commande suivante :
wdApp.ScreenUpdating = False
Mais cela n'a pas l'air de fonctionner.

Si qqun avait un idée...
Salutations
JLuc

1 réponse

Avatar
papou
Bonjour
Il y a plusieurs choses qui m'interpellent ;-)
wdApp.Visible = False
L'application Word s'ouvre bien visuellement
Ah bon ? là déjà tu as un problème puisque tu donnes la valeur false à la

propriété visible ce qui en théorie ne doit pas afficher l'appli Word.
wdApp.ScreenUpdating = False
Là encore pas normal car la propriété existe bel et bien dans Word.

Ceci étant au vu de ton wdApp.visible = False préalable qui devrait
fonctionner...

Cordialement
Pascal

"Jean-Luc CAPEL" a écrit dans le message de
news:%23B$zt$
Bonjour à tous,

J'essaye d'ouvrir et de fermer à la suite des fichiers Word (*.doc) à
partir

d'une procédure VBA Excel afin de récupérer des données dans chacun des
documents.
j'utilise pour cela les commandes suivantes :

'Créer une session Microsoft Word
Set wdApp = CreateObject("word.application")

'Rendre le document visible
wdApp.Visible = False

...

L'application Word s'ouvre bien visuellement ainsi que tous les fichiers
Word. Cependant je pense que le raffraichissement de l'écran est une perte
de temps CPU.
Y aurait il un myen de cacher l'ouverture de l'application word et/ou
l'ouverture de tous ces fichiers Word qui "rebondissent".

J'ai éssayé la commande suivante :
wdApp.ScreenUpdating = False
Mais cela n'a pas l'air de fonctionner.

Si qqun avait un idée...
Salutations
JLuc