Classe VPageBreak - un saut de page vertical (Excel VBA)

Cet objet représente un saut de page vertical. Pour utiliser une variable de classe VPageBreak, elle doit d'abord être instanciée, par exemple

For Each

Voici un exemple de traitement des éléments VPageBreak dans une collection

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

Delete

Cette méthode supprime l'objet.

Dim vpgbr As VPageBreak: Set vpgbr = 
vpgbr.Delete

DragOff

Cette méthode fait glisser un saut de page hors de la zone d'impression.

Cette méthode concerne principalement l'enregistrement d'une macro. Vous pouvez utiliser la méthode Delete pour supprimer un saut de page dans Visual Basic.

DragOff (Direction, RegionIndex)

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

Arguments

Les arguments nommés :

Direction (XlDirection) - Direction dans laquelle le saut de page est déplacé.

Valeurs possibles sont

RegionIndex (Long) - Index de la zone d'impression pour le saut de page (zone où le pointeur de la souris se trouve lorsque le bouton de la souris est enfoncé si l'utilisateur fait glisser le saut de page). Si la zone d’impression est contiguë, il n’y a qu’une seule zone d’impression. Si la zone d’impression est discontinue, il y a plus d’une zone d’impression.

Extent

Cette propriété renvoie le type du saut de page spécifié : plein écran ou exclusivement situé dans une zone d’impression. Peut être l’une des constantes XlPageBreakExtent suivantes: xlPageBreakFull ou xlPageBreakPartial. Type de données Long en lecture seule. Les valeurs de retour possibles sont xlPageBreakFull - Plein écran, xlPageBreakPartial - Uniquement la zone d'impression.

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

Location

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

Type

Cette propriété renvoie ou définit une valeur XlPageBreak qui représente le type de saut de page. Les valeurs de retour possibles sont xlPageBreakAutomatic - Excel ajoutera automatiquement des sauts de page, xlPageBreakManual - Les sauts de page sont insérés manuellement, xlPageBreakNone - Les sauts de page ne sont pas insérés dans la feuille de calcul.

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