本示例取消对"允许标点溢出边界"的设置 。

With ActiveDocument.PageSetup
    .GenkoHangingPunctuation = False
End With