Window.StyleAreaWidth (Word)

Devuelve o establece el ancho del área de estilo en puntos.

Cuando la propiedad StyleAreaWidth es mayor que 0 (cero), se muestran los nombres de estilo a la izquierda del texto.

With ActiveDocument.ActiveWindow 
 .View.Type = wdNormalView 
 .StyleAreaWidth = InchesToPoints(1) 
End With