Range.MoveWhile (Word)
Déplace la plage spécifiée tant que l'un des caractères indiqués est trouvé dans le document.
Tant que n'importe quel caractère de Cset est trouvé, la plage spécifiée est déplacée.
Dim aRange As Range
Set aRange = ActiveDocument.Characters(1)
aRange.MoveWhile Cset:="atiATI", Count:=wdForward
Arguments
Un argument nommé
Cset (String) - Un ou plusieurs caractères.
Optional arguments
Les arguments suivants sont facultatifs
Count (Long) - Le nombre maximal de caractères à laquelle la plage spécifiée doit être déplacée.