Klasse Page (Word VBA)

Die Klasse Page stellt eine Seite in einem Dokument dar.

Set

Um eine Page -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim pag as Page
Set pag = ActiveWindow.ActivePane.Pages(Index:=1)

Die folgenden Prozeduren können zum Festlegen der Page Klassenvariablen verwendet werden : Pages.Item und Pane.Pages

For Each

Hier ist ein Beispiel für die Verarbeitung der Page -Elemente in einer Sammlung

Dim pag As Page
For Each pag In ActiveWindow.ActivePane.Pages
	
Next pag

Eigenschaften

Breaks Gibt eine Breaks -Auflistung zurück, die die Umbrüche auf einer Seite darstellt.

Dim brksBreaks As Breaks
Set brksBreaks = ActiveWindow.ActivePane.Pages(1).Breaks

EnhMetaFileBits Gibt einen Variant -Wert zurück, der eine Bilddarstellung zeigt, wie eine Textseite angezeigt wird.

Dim varEnhMetaFileBits As Variant
varEnhMetaFileBits = ActiveWindow.ActivePane.Pages(1).EnhMetaFileBits

Height Gibt einen Wert vom Typ Long zurück, der die Höhe eines Zeichenblatts in Pixel darstellt.

Dim lngHeight As Long
lngHeight = ActiveWindow.ActivePane.Pages(1).Height

Left Gibt einen Wert vom Typ Long zurück, der den linken Rand der Seite darstellt.

Dim lngLeft As Long
lngLeft = ActiveWindow.ActivePane.Pages(1).Left

Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Page-Objekts darstellt.

Dim objParent As Object
Set objParent = ActiveWindow.ActivePane.Pages(1).Parent

Rectangles Gibt eine Rectangles -Auflistung zurück, die einen Teil von Text oder Grafiken auf einer Seite in einem Dokument darstellt.

Dim rctsRectangles As Rectangles
Set rctsRectangles = ActiveWindow.ActivePane.Pages(1).Rectangles

Top Gibt einen Wert vom Typ Long zurück, der den oberen Rand der Seite darstellt.

Dim lngTop As Long
lngTop = ActiveWindow.ActivePane.Pages(1).Top

Width Gibt einen Wert vom Typ Long zurück, der die Breite (in Punkt) des im Dialogfeld Seite einrichten definierten Papiers darstellt.

Dim lngWidth As Long
lngWidth = ActiveWindow.ActivePane.Pages(1).Width

Pages.Count Gibt einen Wert vom Typ Long zurück, der die Anzahl der Seiten in der Auflistung darstellt.

Dim lngCount As Long
lngCount = ActiveWindow.ActivePane.Pages.Count

Pages.Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Pages-Objekts darstellt.

Dim objParent As Object
Set objParent = ActiveWindow.ActivePane.Pages.Parent