本示例设置稿纸的高度为500像素。
With ActiveDocument.PageSetup
.GenkoPageHeight = 500
End With