Word VBA教程:StartingNumber属性

返回或设置注释编号、行号或页码的起始值。Long 类型,可读写。

expression.StartingNumber

expression   必需。该表达式返回“应用于”列表中的一个对象。

说明

只有在页面视图中才能看到行号。

当用于页码时,本属性返回或设置特定HeaderFooter对象的起始页码。这个页码是否在第一页显示取决于ShowFirstPageNumber属性的设置。如果将RestartNumberingAtSection属性设置为 False,就将忽略 StartingNumber属性,这样页码可以从前一节继续编排。

VBA示例

本示例创建一篇新文档,将脚注的起始编号设置为 10,然后在插入点添加一个脚注。


Set myDoc = Documents.Add
With myDoc.Footnotes
    .StartingNumber = 10
    .Add Range:=Selection.Range, Text:="Text for a footnote"
End With

本示例将为活动文档设置行号。起始编号设置为 5,编号间隔设置为 5,并且文档每节的开头独立编号。


With ActiveDocument.PageSetup.LineNumbering
    .Active = True
    .StartingNumber = 5
    .CountBy = 5
    .RestartMode = wdRestartSection
End With

本示例设置页码属性,然后为活动文档的页眉添加页码。


With ActiveDocument.Sections(1) _
        .Headers(wdHeaderFooterPrimary).PageNumbers
    .NumberStyle = wdPageNumberStyleArabic
    .IncludeChapterNumber = False
    .RestartNumberingAtSection = True
    .StartingNumber = 5
    .Add PageNumberAlignment:=wdAlignPageNumberCenter, _
        FirstPage:=True
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号