Clase HPageBreaks (Excel VBA)

Colección de saltos de página horizontales dentro del área de impresión.

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos HPageBreaks en una colección.

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

Add

Agrega un salto de página horizontal.

Add (Before)

Before: Un objeto Range .

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

Count

Devuelve un valor Long que representa el número de objetos de la colección.

Dim hpbs As HPageBreaks: Set hpbs = 
Dim lngCount As Long
lngCount = hpbs.Count

Item

Devuelve un solo objeto de una colección.

Item (Index)

Index: Número de índice del objeto.

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