Clase VPageBreak - un salto de página vertical (Excel VBA)

La clase VPageBreak representa un salto de página vertical. Para usar una variable de clase VPageBreak, primero debe ser instanciado, por ejemplo

For Each

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

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

Delete

Elimina el objeto.

Dim vpgbr As VPageBreak: Set vpgbr = 
vpgbr.Delete

DragOff

Arrastra un salto de página y lo deja fuera del área de impresión.

Este método se utiliza, principalmente, para la grabadora de macros. Puede usar el método Delete para eliminar un salto de página en Visual Basic.

DragOff (Direction, RegionIndex)

Dim lngRegionIndex As Long: lngRegionIndex = 1
Dim vpgbr As VPageBreak: Set vpgbr = 
vpgbr.DragOff Direction:=xlDown, RegionIndex:=lngRegionIndex

Arguments

Estos son los argumentos con nombre :

Direction (XlDirection) - Dirección en la que se arrastra el salto de página.

Valores posibles son

RegionIndex (Long) - Índice de la región del área de impresión para el salto de página; es decir, la región en la que está el puntero del mouse (ratón) cuando se hace clic si el usuario arrastra el salto de página. Si el área de impresión es contiguo, solo hay una región de impresión. Si el área de impresión es contiguo, hay más de una región de impresión.

Extent

Devuelve el tipo del salto de página especificado: pantalla completa o solamente dentro de un área de impresión. Puede ser cualquiera de las siguientes constantes XlPageBreakExtent : xlPageBreakFull o xlPageBreakPartial. Long de sólo lectura. Posibles valores de retorno son xlPageBreakFull - A toda la pantalla, xlPageBreakPartial - Sólo al área de impresión.

Dim vpgbr As VPageBreak: Set vpgbr = 
Dim xpbExtent As XlPageBreakExtent
xpbExtent = vpgbr.Extent

Location

Dim vpgbr As VPageBreak: Set vpgbr = 
vpgbr.Location =

Type

Devuelve o establece un valor XlPageBreak que representa el tipo de salto de página. Posibles valores de retorno son xlPageBreakAutomatic - Excel agrega automáticamente los saltos de página, xlPageBreakManual - Los saltos de página se insertan manualmente, xlPageBreakNone - Los saltos de página no se insertan en la hoja de cálculo.

Dim vpgbr As VPageBreak: Set vpgbr = 
vpgbr.Type = xlPageBreakAutomatic