Window.DisplayVerticalRuler (Word)

True si se muestra una regla vertical para la ventana o panel especificado.

Aparece una regla vertical sólo en la vista Diseño de impresión, y sólo si la propiedad DisplayRulers está establecida en True.

Dim winLoop As Window 
 
For Each winLoop In Windows 
 With winLoop 
 .View.Type = wdPrintView 
 .DisplayRulers = True 
 .DisplayVerticalRuler = True 
 End With 
Next winLoop