Klasse HPageBreaks (Excel VBA)

Die Auflistung der horizontalen Seitenumbrüche im Druckbereich. Um eine HPageBreaks -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

For Each

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


Dim shts As Sheets: Set shts = 
Dim hpgbr As HPageBreak
For Each hpgbr In shts.HPageBreaks
	With hpgbr
		
	End With
Next hpgbr

Add

Fügt einen horizontalen Seitenumbruch ein.

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 hpbs As HPageBreaks: Set hpbs = 
Dim lngCount As Long
lngCount = hpbs.Count

Item

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Item (Index)

Index: Die Indexnummer des Objekts.


Dim hpbs As HPageBreaks: Set hpbs = 
Dim hpgbrItem As HPageBreak
Set hpgbrItem = hpbs(Index:=1)