Window.DisplayVerticalScrollBar (Word)

True si une barre de défilement verticale est affichée pour la fenêtre spécifiée.

Dim winLoop As Window 
 
For Each winLoop In Windows 
 winLoop.DisplayVerticalScrollBar = True 
 winLoop.DisplayHorizontalScrollBar = True 
Next winLoop