本示例将活动文档第一段的段后间距设置为 12 磅。

ActiveDocument.Paragraphs(1).SpaceAfter = 12

 

本示例将活动文档设置为三栏,第一栏后的间距为 0.5 英寸。
InchesToPoints 方法用来将英寸转换为磅值。

With ActiveDocument.PageSetup.TextColumns
    .SetCount NumColumns:=3
    .LineBetween = False
    .EvenlySpaced = True
    .Item(1).SpaceAfter = InchesToPoints(0.5)
End With