本示例设置稿纸的方向为横向。

With ActiveDocument.PageSetup
    .GenkoOrientation = wpsOrientLandscape
End With