Discussion :

[PierreXV]

Bonjour à tous

Je rencontre un problème au niveau de mon pilotage de word. J'ai un fichier type de format docx avec des zones de dessins dont le texte à l’intérieur est à modifier ( Ex: #Client# ou par ###Section### . J'arrive à modifier lorsque les textes sont hors des zones de textes ... Ce qu'il me manque c'est de pouvoir parcourir toutes mes zones de textes.
Avez vous une idée?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Word>>Selection>>GoTo(1,1,"1")     // <=== C'est ce paramètre à modifier
Word>>Selection>>Find>>ClearFormatting()
Word>>Selection>>Find>>Forward=True
Word>>Selection>>Find>>Text=texte_cherche
Word>>Selection>>Find>>MatchWildcards=OLEVrai
Word>>Selection>>Find>>Execute()
TANTQUE Word>>Selection>>Find>>Found<>0
	Word>>Selection>>Text = sVariable
	Word>>Selection>>Find>>Execute()
FIN

Merci à vous
Bon début de weekend

[jurassic pork]

hello,
regarde ici

Ami calmant, J.P

[PierreXV]

Merci jurassic pork

Ça m'a bien aidé. J'ai juste une petite question en annexe...
Connais tu la commande pour sauvegarder mon fichier.
Word>>Selection>>Save() ?
Word>>Save() ?
Word>>Documents>>Save() ?

J'ai un peu tout essayé et je ne trouve pas... Ça se trouve ça n'a rien à voir ^^

[jurassic pork]

Hello,

Essaie :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
word>>activeDocument>>Save()
	word>>ActiveDocument>>Close(Faux)   // Fermeture du document

ou pour écrire dans un nouveau fichier

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
word>>activeDocument>>SaveAs( NouveauNom,0)
	word>>ActiveDocument>>Close(Faux)   // Fermeture du document

Ami calmant, J.P