Window.DisplayVerticalScrollBar (Word)

True si se muestra una barra de desplazamiento vertical de la ventana especificada.

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