我只想在下面的代码中设置最后的para列:
wordDoc.Paragraphs.Last.Range.PageSetup.TextColumns.SetCount(3);
但是它将页面设置为3列;
那么,什么代码可以设置最后的para列?
答案 0 :(得分:0)
没有段落列属性-只有页面列属性(TextColumns)。如果要限制TextColumns的范围,请在相关段落之前(如果适用)之后插入分节符。例如:
Sub Demo()
Dim wordDoc As Document
Set wordDoc = ActiveDocument
With wordDoc.Paragraphs.Last.Range
.InsertBreak Type:=wdSectionBreakContinuous
.PageSetup.TextColumns.SetCount (3)
End With
End Sub