Range.Move-Methode (Word)
Reduziert den angegebenen Bereich auf seine Start- bzw. Endposition und verschiebt das reduzierte Objekt dann um die angegebene Anzahl von Einheiten.
Ausdruck.
Move
( _Unit_
, _Count_
)
expression Erforderlich. Eine Variable, die ein Range -Objekt darstellt.
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Unit | Optional | WdUnits | Die Einheit, um die der Bereich verschoben werden soll. |
Count | Optional | Variant | Die Anzahl der Einheiten, um die der angegebene Bereich verschoben werden soll. Wenn Count eine positive Zahl ist, wird das Objekt an seine Endposition reduziert und im Dokument um die angegebene Anzahl von Einheiten rückwärts verschoben. Wenn Count eine negative Zahl ist, wird das Objekt an seine Startposition reduziert und um die angegebene Anzahl von Einheiten vorwärts verschoben. Der Standardwert ist 1. Sie können auch die Richtung reduzieren steuern, mithilfe der reduzieren -Methode verwenden, bevor Sie die Move -Methode verwenden. Wenn sich der Bereich in der Mitte einer Einheit befindet oder nicht reduziert ist, zählt das Verschieben an den Anfang oder das Ende der Einheit als Verschieben um eine vollständige Einheit. |
Long
Diese Methode gibt einen Long-Wert zurück, der die Anzahl der Einheiten anzeigt, um die das Objekt tatsächlich verschoben wurde, oder sie gibt 0 (null) zurück, wenn die Verschiebung nicht erfolgreich war.
Die Startposition und Endposition eines reduzierten Bereichs sind identisch.
Die Anwendung der Move-Methode auf einen Bereich ordnet den Text im Dokument nicht um. Der Bereich wird vielmehr neu definiert, sodass er sich auf eine andere Stelle im Dokument bezieht.
In diesem Beispiel wird Range1 auf den ersten Absatz im aktiven Dokument festgelegt und dann der Bereich um drei Absätze vorwärts verschoben. Nach Ausführung dieses Makros ist die Einfügemarke am Anfang des vierten Absatzes positioniert.
Set Range1 = ActiveDocument.Paragraphs(1).Range
With Range1
.Collapse Direction:=wdCollapseStart
.Move Unit:=wdParagraph, Count:=3
.Select
End With
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.