添加链接
link管理
链接快照平台
  • 输入网页链接,自动生成快照
  • 标签化管理网页链接

下列範例會將範圍向上移動兩行。

ActiveDocument.Range.GoTo What:=wdGoToLine, Which:=wdGoToPrevious, Count:=2

下列範例會移至下一個 DATE 功能變數。

ActiveDocument.Range.GoTo What:=wdGoToField, Name:="Date"

下列範例會將範圍移動至文件中的第四行。

ActiveDocument.Range.GoTo What:=wdGoToLine, Which:=wdGoToAbsolute, Count:=4

下列範例具有相同的作用,都會將範圍移動至文件中的第一個標題。

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

當您使用 GoTo 方法與 wdGoToGrammaticalErrorwdGoToProofreadingErrorwdGoToSpellingError 常數時,則會傳回的 範圍 會包含任何的文法錯誤文字或拼字錯誤文字。

本範例會將插入點移到現用文件中第五個章節附註參照標記之前。

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

這個範例會將 R1 設定為與使用中文件內第一個註腳參照標記一樣。

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

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應