Range.MoveEndUntil (Word)
Mueve la posición final del intervalo especificado hasta que se encuentre en el documento alguno de los caracteres especificados.
Este método devuelve el número de caracteres que se ha movido la posición final del intervalo especificado, como un valor de tipo Long .
With Selection.Range
.MoveEndUntil Cset:="a", Count:=wdForward
.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
End With
Arguments
Un argumento con nombre
Cset (Characters) - Uno o más caracteres.
Optional arguments
Los siguientes argumentos son opcionales
Count (Long) - El número máximo de caracteres que se va a mover el intervalo especificado.