Word VBA教程:Next方法

应用于 Paragraph对象的 Next方法。

返回一个 Paragraph对象,该对象代表下一段。

expression.Next(Count)

expression   必需。该表达式返回一个 Paragraph对象。

Count  Variant 类型,可选。可以向上移动的段落数,默认值是 1。

应用于 Range 和 Selection对象的 Next方法。

返回一个 Range对象,该对象代表相对于指定选定范围或区域的指定单元。

expression.Next(Unit, Count)

expression   必需。该表达式返回以上的一个对象。

Unit  Variant 类型,可选。统计的单元类型。可以是任意WdUnits 常量。

WdUnits 可以是下列 WdUnits 常量之一:
wdCharacter 默认值。
wdWord
wdSentence
wdParagraph
wdSection
wdStory
wdCell
wdColumn
wdRow
wdTable
wdLine  如果 expression 返回一个 Selection对象,则可以使用。

Count  Variant 类型,可选。可以向上移动的单元数,默认值是 1。

说明

如果 Range 或 Selection 恰好在指定的 Unit 之前,则 Range 或 Selection 将移至下一个单元。例如,如果 Selection 恰好在一个词前面,则下面的指令可将 Selection 移至该词之后。


Selection.Next(Unit:=wdWord, Count:=1).Select

应用于 Browser对象的 Next方法。

将选定内容移动到浏览器目标指明的下一项。使用Target属性可以改变浏览器目标。

expression.Next

expression   必需。该表达式返回一个 Browser对象。

VBA示例

当应用于 Browser对象时。

本示例将插入点移至活动文档的下一个备注引用标记前。


With Application.Browser
    .Target = wdBrowseComment
    .Next
End With

当应用于 Paragraph对象时。

本示例在活动文档前九段的每一段前插入一个数字和一个制表符。


For n = 0 To 8
    Set myRange = ActiveDocument.Paragraphs(1).Next(Count:=n).Range
    myRange.Collapse Direction:=wdCollapseStart
    myRange.InsertAfter n + 1 & vbTab
Next n

本示例选定当前选定内容的下一段。


Selection.Next(Unit:=wdParagraph, Count:=1).Select

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号