Window.DisplayVerticalRuler (Word)

True si la règle verticale est affichée pour la fenêtre spécifiée ou du volet.

La règle verticale s'affiche uniquement en mode page, et uniquement si la propriété DisplayRulers a la valeur true.

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