Range.HorizontalInVertical (Word)

Devuelve o establece el formato de texto horizontal colocado dentro de texto vertical. Posibles valores de retorno son wdHorizontalInVerticalFitInLine - El texto horizontal recibe el tamaño necesario para ajustarse a la línea de texto vertical, wdHorizontalInVerticalNone - No se aplica ningún formato al texto horizontal, wdHorizontalInVerticalResizeLine - La línea de texto vertical recibe el tamaño necesario para que quepa el texto horizontal.

Selection.Range.HorizontalInVertical = wdHorizontalInVerticalFitInLine