在VBA中:如果我正在编写类似于以下代码的代码:
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).PageNumbers.Add _
PageNumberAlignment:=wdAlignPageNumberLeft, _
FirstPage:=True
End With
对于第一行的“ .Sections()”部分...在()中放置哪些可接受的参数? 我试图让代码影响多个部分(而不仅仅是第1部分)。我需要以某种方式使用Range还是有另一种方式?
答案 0 :(得分:0)
对于Sections
集合,只有一个索引值(数字)是有效参数。使用页眉/页脚一次只能影响一个Section
。
为了使您的代码少一点冗长-因此您不必为每个部分写出代码-您可以创建一个由部分索引号组成的数组,然后使用For...Next
来影响每个部分您要更改的页脚。
或者您可以将用于修改页脚的代码放在单独的过程(Sub
)中,并为每个部分调用它。