Selection.MoveRight-Methode (Word)
Verschiebt die Auswahl nach rechts und gibt die Anzahl der Einheiten zurück, um die sie verschoben wurde.
Syntax
Ausdruck.
MoveRight( _Unit_ , _Count_ , _Extend_ )
expression Erforderlich. Eine Variable, die ein Selection-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Unit | Optional | WdUnits | Die Einheit, um die die Markierung verschoben werden soll. Der Standardwert ist wdCharacter. |
| Count | Optional | Variant | Die Anzahl der Einheiten, um die die Markierung verschoben werden soll. Der Standardwert ist 1. |
| Extend | Optional | Variant | Kann wdMove oder wdExtend sein. Wenn Sie wdMove verwenden, wird die Markierung zu einer Einfügemarke reduziert und nach rechts verschoben. Wenn Sie wdExtend verwenden, wird die Markierung nach rechts erweitert. Der Standardwert ist wdMove. |
Rückgabewert
Long
Hinweise
Wenn "Unit" den Wert wdCell aufweist, kann das Argument "Extend" nur den Wert wdMove besitzen.
Beispiel
In diesem Beispiel wird die Markierung vor das vorherige Feld verschoben und anschließend das Feld markiert.
With Selection
Set MyRange = .GoTo(wdGoToField, wdGoToPrevious)
.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend
If Selection.Fields.Count = 1 Then Selection.Fields(1).Update
End With
In diesem Beispiel wird die Markierung um ein Zeichen nach rechts verschoben. Wenn der Vorgang erfolgreich ausgeführt wurde, gibt MoveRight den Wert 1 zurück.
If Selection.MoveRight = 1 Then MsgBox "Move was successful"
In diesem Beispiel wird die Auswahl in die nächste Tabellenzelle verschoben.
If Selection.Information(wdWithInTable) = True Then
Selection.MoveRight Unit:=wdCell, Count:=1, Extend:=wdMove
End If
Siehe auch
Support und Feedback
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.