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)