Discussion :

[yald1]

bonjour,

je cherche à à placer dans une feuille excel des données issues de word.

J'ai donc créé sous Excel une macro.

Je manipule les infos de Word à travers l'objet:
pAra = ActiveDocument.Paragraphs.

Et je récupère une string avec pAra.Range.Text

Là, où j'ai un problème c'est pour faire des comparaisons de chaine .

si dans word je récupère la chaine "Canton de : Triffouillis"
et que je me sers de la fonction Instr pour trouver "Canton de", je n'ai pas de réponse.

J'ai voulu redévelopper une fonction Instr et je me suis rendu compte que dans la chaine issue de Word "Canton de : Triffouillis", l'espace n'est pas un espace !

Si je fais une comparaison du septième caractère avec la chaine " ", le résultat est faux.

De même si j'applique la fonction trim sur le septième caractère au lieu d'avoir comme résultat "" j'ai toujours " ". J'ai voulu voir si c'est un caractère vbLf ou vbCr et là non plus pas de résultat.

Voilà, j'ai regardé avec l'explorateur d'espion et je n'ai pas avancé d'un pouce.

J'espère avoir été suffisamment clair et si quelqu'un peut m'indiquer mon erreur ou un moyen de contourner ce problème je suis preneur.

Cordialement.

Yann

[le_dilem]

Salut Yann

Si tu mes MSBOX ( .... 7,1) tu as comme résultat ?

[yald1]

Salut,

et bien avec la msgbox le prompt est vide également

Yann

[le_dilem]

Dans ce cas la je propose que tu fasse une Macro qui parcours ta cellule
et tu compare avec LIKE [A-Z] si non remplace ta cellule par "-".
Cells(....7,1) = " "

[yald1]

Bon, tu m'as mis sur la voie avec l'histoire des caractères.

J'ai fait un asc(Car) et il me renvoie la valeur 160.

160 qui caractérise un espace ... insécable (donc à priori pas la même chose qu'un espace "normal")

http://fr.wikipedia.org/wiki/Espace_ins%C3%A9cable

voila.