Klasse Rectangles (Word VBA)

Eine Auflistung von Rectangle -Objekten in einer Seite, die Teile von Text und Grafiken darstellen. Um eine Rectangles -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

For Each

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

Dim lin As Line: Set lin = 
Dim shp As Rectangle
For Each shp In lin.Rectangles
	With shp
		
	End With
Next shp

Count

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

Dim rcts As Rectangles: Set rcts =  
Dim lngCount As Long
lngCount = rcts.Count

Item

Gibt ein einzelnes Rectangle -Objekt in einer Auflistung zurück.

Item (Index)

Index: Das einzelne Objekt zurückgegeben werden soll.

Dim rcts As Rectangles: Set rcts =  
Dim shp As Rectangle
Set shp = rcts(Index:=1)