Range.Next (Word)
Devuelve un objeto Range que representa la unidad especificada con respecto al rango especificado.
Si el intervalo se encuentra inmediatamente antes de un elemento del tipo especificado por el argumento Unit, dicho intervalo se mueve hasta la unidad siguiente.
Selection.Range.Next(Unit:=wdWord, Count:=1).Select
Arguments
Optional arguments
Los siguientes argumentos son opcionales
Unit (WdUnits) - Tipo de unidades que se va a utilizar para contar.
Aquí puede ver valores posibles para
Count (Long) - Número de unidades que desea desplazarse hacia delante.