Selection.MoveStartUntil (Word)
Mueve la posición inicial de la selección especificada 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 inicial de la selección especificada, como un valor de tipo Long .
Selection.MoveStartUntil Cset:="I", Count:=wdBackward