Classe HPageBreak - uma quebra de página horizontal (Excel VBA)

A classe HPageBreak representa uma quebra de página horizontal. Para usar uma variável de classe HPageBreak, ela primeiro precisa ser instanciada por exemplo

For Each

Aqui está um exemplo de processamento dos itens HPageBreak em uma coleção.

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

Delete

Exclui o objeto.

Dim hpgbr As HPageBreak: Set hpgbr = 
hpgbr.Delete

DragOff

Arrasta uma quebra de página para fora da área de impressão.

Este método existe basicamente para o gravador de macros. Você pode usar o método delete para excluir uma quebra de página no Visual Basic.

DragOff (Direction, RegionIndex)

Dim lngRegionIndex As Long: lngRegionIndex = 
Dim hpgbr As HPageBreak: Set hpgbr = 
hpgbr.DragOff Direction:=xlDown, RegionIndex:=lngRegionIndex

Arguments

O seguinte argumento é opcional

Direction (XlDirection) - A direção na qual a quebra de página é arrastada.

Os valores possíveis são

RegionIndex (Long) - O índice de região da área de impressão para a quebra de página (a região onde se situa o ponteiro do mouse quando o botão do mouse é pressionado caso o usuário arraste a quebra de página). Se a área de impressão for contígua, haverá apenas uma região de impressão. Se a área de impressão for incontígua, haverá mais de uma região de impressão.

Extent

Retorna o tipo da quebra de página especificada: de tela inteira ou somente dentro de uma área de impressão. Pode ser uma das seguintes constantes XlPageBreakExtent : xlPageBreakFull ou xlPageBreakPartial. Long somente leitura. Os valores de retorno possíveis são xlPageBreakFull - Tela cheia, xlPageBreakPartial - Somente na área de impressão.

Dim hpgbr As HPageBreak: Set hpgbr = 
Dim xpbExtent As XlPageBreakExtent
xpbExtent = hpgbr.Extent

Location

Retorna ou define a célula um objeto Range que define o local da quebra de página. As quebras de página horizontais são alinhadas com a borda superior da célula de local. Range de leitura/gravação.

Dim hpgbr As HPageBreak: Set hpgbr = 
hpgbr.Location =

Type

Retorna ou define um valor XlPageBreak que representa o tipo de quebra de página. Os valores de retorno possíveis são xlPageBreakAutomatic - O Excel adicionará quebras de página automaticamente, xlPageBreakManual - As quebras de página são inseridas manualmente, xlPageBreakNone - Quebras de página não são inseridas na planilha.

Dim hpgbr As HPageBreak: Set hpgbr = 
hpgbr.Type = xlPageBreakAutomatic