Klasse VPageBreaks (Excel VBA)

Eine Auflistung vertikaler Seitenumbrüche innerhalb des Druckbereichs. Um eine VPageBreaks -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

For Each

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

Dim shts As Sheets: Set shts = 
Dim vpgbr As VPageBreak
For Each vpgbr In shts.VPageBreaks
	With vpgbr
		
	End With
Next vpgbr

Add

Fügt einen vertikalen Seitenumbruch hinzu.

Add (Before)

Before: Ein Range -Objekt.

With Worksheets(1) 
 .HPageBreaks.Add .Range("F25") 
 .VPageBreaks.Add .Range("F25") 
End With

Count

Gibt einen Long-Wert zurück, der die Anzahl der Objekte in der Auflistung darstellt.

Dim vpbs As VPageBreaks: Set vpbs = 
Dim lngCount As Long
lngCount = vpbs.Count

Item

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Item (Index)

Index: Die Indexnummer des Objekts.

Dim vpbs As VPageBreaks: Set vpbs = 
Dim vpgbrItem As VPageBreak
Set vpgbrItem = vpbs(Index:=1)