Word VBA教程:GoTo方法

对于 Document 或 Range对象:返回一个 Range对象,该对象代表指定项(例如页、书签或域)的开始位置。

对于 Selection对象:将插入点移至指定项前面的字符位置,并返回一个 Range对象(但 wdGoToGrammaticalError、wdGoToProofreadingError 或 wdGoToSpellingError 常量除外)。

expression.GoTo(What, Which, Count, Name)

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

What  Variant 类型,可选。指定区域或所选内容要移动到的项的类别。可以是下列WdGoToItem 常量之一。

WdGoToItem 可以是下列 WdGoToItem 常量之一:
wdGoToBookmark
wdGoToComment
wdGoToEndnote
wdGoToEquation
wdGoToField
wdGoToFootnote
wdGoToGrammaticalError
wdGoToGraphic
wdGoToHeading
wdGoToLine
wdGoToObject
wdGoToPage
wdGoToPercent
wdGoToProofreadingError
wdGoToRevision
wdGoToSection
wdGoToSpellingError
wdGoToTable

Which  Variant 类型,可选。指定区域或所选内容要移动到的项。可以是下列WdGoToDirection 常量之一。下列示例功能相等,都将所选内容移动到文档中的第一个标题。

WdGoToDirection 可以是下列 WdGoToDirection 常量之一:
wdGoToAbsolute
wdGoToFirst
wdGoToLast
wdGoToNext
wdGoToPrevious
wdGoToRelative

Selection.GoTo What:=wdGoToHeading, Which:=wdGoToFirst
Selection.GoTo What:=wdGoToHeading, Which:=wdGoToAbsolute, Count:=1

Count  Variant 类型,可选。文档中的项数。默认值是 1。下面的示例将所选内容移至文档中的第四行。


Selection.GoTo What:=wdGoToLine, Which:=wdGoToAbsolute, Count:=4

只有正数是有效的。若要指定一个在该区域或所选内容之前的项,可将 Which参数指定为 wdGoToPrevious,并指定一个 Count 值。下面的示例将所选内容向上移动两行。


Selection.GoTo What:=wdGoToLine, Which:=wdGoToPrevious, Count:=2

Name  Variant 类型,可选。如果 What参数是 wdGoToBookmark、wdGoToComment、wdGoToField 或 wdGoToObject,则本参数指定名称。下面的示例移至下一个 DATE 域。


Selection.GoTo What:=wdGoToField, Name:="Date"

说明

将 GoTo方法用于 wdGoToGrammaticalError、wdGoToProofreadingError 或 wdGoToSpellingError 常量时,返回的 Range对象中包括所有含语法或拼写错误文本。

VBA示例

本示例将所选内容移至下一个表格的第一个单元格。


Selection.GoTo What:=wdGoToTable, Which:=wdGoToNext

本示例将插入点移至活动文档第五个尾注引用标记的前面。


If ActiveDocument.Endnotes.Count >= 5 Then
    Selection.GoTo What:=wdGoToEndnote, _
        Which:=wdGoToAbsolute, Count:=5
End If

本示例将R1 设置为等于活动文档中第一个脚注引用标记。


If ActiveDocument.Footnotes.Count >= 1 Then
    Set R1 = ActiveDocument.GoTo(What:=wdGoToFootnote, _
        Which:=wdGoToFirst)
    R1.Expand Unit:=wdCharacter
End If

本示例将所选内容向下移动四行。


Selection.GoTo What:=wdGoToLine, Which:=wdGoToRelative, Count:=4

本示例将所选内容向后移动两页。


Selection.GoTo What:=wdGoToPage, Which:=wdGoToPrevious, Count:=2

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号