Thanks for your feedback!
The behavior of my code is very curious for me too, knowing that group capture would work just fine before last February 13. I know that on that day I had updating windows 11 and office 365.
Usually, I get around the problem with the following code:
Code:
With texte
With .Find
.Forward = True: .Wrap = wdFindStop: .MatchWildcards = True
.Text = "…[A-Za-zÀ-ÖØ-öø-ÿ0-9]"
End With
Do While .Find.Execute = True
.Text = "… " & Right(.Text, 1): .Collapse wdCollapseEnd
Loop
End With
Anyway, many thanks for your contributions... if I find the reasons for this problem I'll come back to this post.