Window.VerticalPercentScrolled (Word)

Devuelve o establece la posición de desplazamiento vertical como porcentaje de la longitud del documento.

MsgBox ActiveDocument.ActiveWindow.VerticalPercentScrolled & "%"