Sujet Précédent Sujet Suivant

Rechercher et remplacer des expressions dans un doc word

Fermé
momouiz - 24 juin 2013 à 18:24
momouiz Messages postés 30 Date d'inscription lundi 24 juin 2013 Statut Membre Dernière intervention 21 octobre 2013 - 25 juin 2013 à 19:47
salut tout le monde,
voila je suis novice en vb, et je cherche à construire une fonction de recherche et de remplacement dans un doc word que j'aurais placé en paramétre:

je sais qu'il y a : With Selection.Find
.ClearFormatting
.Highlight = True
.Forward = True
.Text = rech
.Execute
Debug.Print .Found

mais je ne sais pas comment utiliser celles-ci

Si l'un de vous avait un exemple ou encore une suggestion merci
A voir également:

2 réponses

Réponse 1 / 2
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
24 juin 2013 à 23:05
D'après m@rina : 
Set myRange = ActiveDocument.Content
With myRange.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "premier texte"
.Replacement.Text = "deuxième texte"
.Execute Replace:=wdReplaceAll ' peut être la raison
End With
Pour voir l'original :
https://faqword.com/index.php/word/faq-word/vba-solutions/489-je-souhaite-modifier-un-mot-particulier-se-trouvant-dans-un-grand-nombre-de-documents
3
Réponse 2 / 2
momouiz Messages postés 30 Date d'inscription lundi 24 juin 2013 Statut Membre Dernière intervention 21 octobre 2013 3
25 juin 2013 à 19:47
excellent merci à tous c'est vraiment le meilleur des forums, en fait pour la solution mon debug.print n'etait pas valable sur ma version d'excel merci patrick.
0