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