Importation données Word-Excel VBA

Bonjour,

J'aurais besoin de conseils et d'avis à propos de ma macro. Je suis totalement novice en VBA et j'ai quelques soucis.
La macro consiste à aller chercher des données dans Word et les placer dans les cellules Excel. l'opération se fait sur tous les Words placés dans le répertoire.
Cette macro fonctionne mais pas à chaque fois. Je n'arrive pas à déterminer la raison et pourquoi elle fonctionne de manière aléatoire
Auriez vous des idées ?

Pièce jointe 309732

Merci d'avance pour votre aide

Amélie

Citation:

---

Envoyé par 88amelie

elle fonctionne de manière aléatoire

---

Pourrais-tu être plus précise ? Qu'est-ce qui est aléatoire dans l'exécution de ta macro ?

Il y a quand même un truc bizarre au début de ta macro :

Code:

---

*** sChemin = ChoisirRepertoire & "\"***************** 'fonction pour choisir le répertoire contenant les fichier Word

---

Si ChoisirRepertoire est une fonction, elle devrait avoir des parenthèses, non ?
Essaye de mettre un Option Explicit avant ton code pour forcer la déclaration de variable.

Petit détail en passant : entre ScreenUpdating = False et WApp.Visible = False, tu cherches vraiment à masquer tout ce qui pourrait t'aider à débuguer.

Citation:

---

Envoyé par Menhir

Pourrais-tu être plus précise ? Qu'est-ce qui est aléatoire dans l'exécution de ta macro ?

Il y a quand même un truc bizarre au début de ta macro :

Code:

---

*** sChemin = ChoisirRepertoire & "\"***************** 'fonction pour choisir le répertoire contenant les fichier Word

---

Si ChoisirRepertoire est une fonction, elle devrait avoir des parenthèses, non ?
Essaye de mettre un Option Explicit avant ton code pour forcer la déclaration de variable.

---

Merci pour ta réponse.

Le problème c'est que justement je n'arrive pas à déterminer quand et pourquoi cela ne fonctionne pas.
Lorsque je lance la macro elle peut soit totalement fonctionner comme je le souhaite, soit j'ai un message d'erreur 'erreur d'exécution". En général quelques données sont importées mais la macro s'arrête avant la fin. Je dis que c'est aléatoire car ça ne s'arrête pas au même endroit à chaque fois.
Option explicit est déjà présent au début de mon code.