Bonjour,
Encore moi.
Je cherche aujourd'hui un moyen de modifier une petite fonction qui permet le remplacement d'une chaîne par une autre dans un fichier word.
En fait elle fait son effet, elle me permet de remplacer des chaines et de les mettre en forme de façon à les rendre visible, les détacher au regard. Mais j'ai le petit soucis persistant, j'aimerais qu'il modifie TOUTE les chaines demandé, quelques soit leurs positions, j'ai le petit hic sur les headers et footers, qui sont tout de même primordiaux.
J'ai cherché plusieurs moyens pour sélectionner les parties concerné :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
For Each section In oWord.sections
                For Each h In section.headers
                    h.range.select()
                    ...
                Next
                For Each h In section.footers
                    h.range.select()
                    ...
                Next
            Next
ou encore
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
For Each section In oWord.sections
               section.headers.range.select()
               ...
               section.footers.range.select()
               ...
                Next
            Next
Ça ne m'affiche que dalle, pas d'erreur, pas de première alerte au débug, rien du tout, et surtout ça marche pas ^^

...
...
...
2014 commence difficilement. J'avais pas du tout tord, j'ai juste un neurone qui a oublié de s'allumer, ça fait deux jours que je suis là dessus :/
Solution :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
For Each section In doc.sections
                For Each h In section.headers
                    h.range.select()
                    ...
                Next
                For Each h In section.footers
                    h.range.select()
                    ...
                Next
            Next