Importation de données Word - Excel: l'utilisation de Wildcards ne fonctionne pas sur tous les PC
Bonjour,
J'ai codé une petite macro qui permet d'importer du texte d'un compte rendu vers un document Excel.
Elle fonctionne très bien, j'en suis très satisfait.
Seulement, quand j'ai voulu diffuser mon document auprès de mes collègues, j'ai remarqué un problème. Je bloque pour le résoudre simplement (La solution compliquée serait de récrire une grosse partie de la macro... J'aimerai autant que possible ne pas en arriver là).
Mon problème:
Sur mon PC et chez la plupart de mes collègues, la macro fonctionne.
Elle a été codée dans un document Excel qui importe le texte d'un Word.
Mais chez d'autres collègues, j'ai un message d'erreur qui s'affiche (Erreur 5560 il me semble).
=> en utilisant l'outil débogage, je trouve que c'est cette section qui bloque:
Code:
1 2 3 4 5 6
|
With rng.Find
.ClearFormatting 'on vide la mémoire de la fonction recherche
.Text = "Action[!^13]{1,}" 'On cherche le mot Action, puis on sélectionne jusqu'au saut de paragraphe
.MatchWildcards = True 'Attention: Recherche par "Wildcard" est sensible à la casse du texte.
.Execute |
Il semblerait que les PC incriminés n'arrivent pas à lire le Wildcards... qui me semble pourtant un fonction basique de Word. L'outil débogage surligne la ligne du MatchWildcards
Nous avons les mêmes PC, dans les mêmes versions de Windows. Les Excels sont aussi dans la même version. Les bibliothèques d'objet sont aussi identiques.
Merci de vos suggestions d'amélioration,