Recorriendo las partes de una selección no contigua en MS * Word * VBA
Tengo una macro en MS Word 2013 VBA (no Excel) que alterna el color de resaltado del texto seleccionado. El código se ve así:
If Selection.Range.HighlightColorIndex = WhtColor Then Selection.Range.HighlightColorIndex = wdNoHighlight Else Selection.Range.HighlightColorIndex = WhtColor
Eso funciona muy bien para selecciones continuas / contiguas. Pero, si selecciono, digamos, 4 filas no contiguas en una tabla de Word (digamos, filas 5, 12, 15 y 19), la macro resalta solo la última fila seleccionada.
¿Cómo consigo que HighlightColorIndex se aplique a todas las "partes" del rango no contiguo, o cómo recorro las diferentes "partes" del rango y aplico HighlightColorIndex a cada parte?