Discussion :

[Rockveleur]

j'utilise la fonction rechercher et ai surligné les résultats en gray25.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
    Options.DefaultHighlightColorIndex = wdGray25
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    Selection.Find.Replacement.Highlight = True
    With Selection.Find
        .Text = "^$, "
        .Replacement.Text = "^&"
        .Forward = True
        .Wrap = wdFindContinue
        .Format = True
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll

j'aimerais modifier cette recherche pour supprimer uniquement ce surlignage gris.
Voulez vous me donner un petit coup de clavier ? car je cale de puis un bon moment.
Merci par avance !

[Rockveleur]

C'était tout bête : il fallait choisir la couleur wdNoHighlight

https://docs.microsoft.com/fr-fr/off...d.wdcolorindex

Code :

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

Options.DefaultHighlightColorIndex = wdNoHighlight

Thanks!