Range.GoTo-Methode (Word)
Gibt ein Range-Objekt zurück, das die Startposition des angegebenen Elements darstellt, z. B. eine Seite, Textmarke oder ein Feld.
Ausdruck.
GoTo
( What , Which , Count , Name )
expression Erforderlich. Eine Variable, die ein Range-Objekt darstellt.
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
What | Optional | Variant | Die Art des Elements, in das der Bereich verschoben wird. Dies kann eine der wdGoToItem-Konstanten sein. |
Which | Optional | Variant | Das Element, in das der Bereich verschoben wird. Dies kann eine der wdGoToDirection-Konstanten sein. |
Count | Optional | Variant | Die Nummer des Elements im Dokument. Der Standardwert ist 1. Es sind nur positive Werte zulässig. Um ein Element anzugeben, das vor dem Bereich steht, verwenden Sie wdGoToPrevious als Which-Argument, und geben Sie einen Count-Wert an. |
Name | Optional | Variant | Wenn das Argument What entweder wdGoToBookmark , wdGoToComment , wdGoToField oder wdGoToObject lautet, gibt dieses Argument einen Namen an. Es sind nur positive Werte zulässig. Um ein Element anzugeben, das vor dem Bereich steht, verwenden Sie wdGoToPrevious als Which-Argument, und geben Sie einen Count-Wert an. |
Im folgenden Beispiel wird der Bereich um zwei Zeilen nach oben verschoben.
ActiveDocument.Range.GoTo What:=wdGoToLine, Which:=wdGoToPrevious, Count:=2
Im folgenden Beispiel wird zum nächsten DATE-Feld gesprungen.
ActiveDocument.Range.GoTo What:=wdGoToField, Name:="Date"
Im folgenden Beispiel wird der Bereich in die vierte Zeile des Dokuments verschoben.
ActiveDocument.Range.GoTo What:=wdGoToLine, Which:=wdGoToAbsolute, Count:=4
Die folgenden Beispiele sind funktional gleich. In beiden wird der Bereich in die erste Überschrift im Dokument verschoben.
ActiveDocument.Range.GoTo What:=wdGoToHeading, Which:=wdGoToFirst
ActiveDocument.Range.GoTo What:=wdGoToHeading, Which:=wdGoToAbsolute, Count:=1
Wenn Sie die GoTo-Methode mit der Konstante wdGoToGrammaticalError, wdGoToProofreadingError oder wdGoToSpellingError verwenden, enthält das zurückgegebene Range-Objekt einen Grammatikfehlertext oder Rechtschreibfehlertext.
In diesem Beispiel wird im aktiven Dokument die Einfügemarke direkt vor das fünfte Endnotenzeichen verschoben.
If ActiveDocument.Endnotes.Count >= 5 Then
ActiveDocument.Range.GoTo What:=wdGoToEndnote, _
Which:=wdGoToAbsolute, Count:=5
End If
In diesem Beispiel wird im aktiven Dokument R1 dem ersten Fußnotenzeichen gleichgesetzt.
If ActiveDocument.Footnotes.Count >= 1 Then
Set R1 = ActiveDocument.Range.GoTo(What:=wdGoToFootnote, _
Which:=wdGoToFirst)
R1.Expand Unit:=wdCharacter
End If
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.