Klasse VPageBreak - einen vertikalen Seitenumbruch (Excel VBA)
Die Klasse VPageBreak stellt einen vertikalen Seitenumbruch dar. Um eine VPageBreak -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
For Each
Hier ist ein Beispiel für die Verarbeitung der VPageBreak -Elemente in einer Sammlung
Dim shts As Sheets: Set shts =
Dim vpgbr As VPageBreak
For Each vpgbr In shts.VPageBreaks
With vpgbr
End With
Next vpgbr
Delete
Löscht das Objekt.
Dim vpgbr As VPageBreak: Set vpgbr =
vpgbr.Delete
DragOff
Zieht einen Seitenumbruch aus dem Druckbereich heraus.
Diese Methode ist vorrangig für die Makroaufzeichnung bestimmt.
DragOff (Direction, RegionIndex)
Dim lngRegionIndex As Long: lngRegionIndex = 1
Dim vpgbr As VPageBreak: Set vpgbr =
vpgbr.DragOff Direction:=xlDown, RegionIndex:=lngRegionIndex
Arguments
Hier sind die benannte Argumente :
Direction (XlDirection) - Die Richtung, in die der Seitenumbruch gezogen wird.
Möglichen Werte sind
xlDown | Dropdown. |
xlToLeft | Nach links |
xlToRight | Nach rechts |
xlUp | Bis. |
RegionIndex (Long) - Der Index der Druckbereichsregion für den Seitenumbruch (die Region, in der sich der Mauszeiger beim Drücken der Maustaste befindet, wenn der Benutzer den Seitenumbruch zieht).
Extent
Gibt den Typ des angegebenen Seitenumbruchs zurück: auf dem ganzen Bildschirm oder nur innerhalb eines Druckbereichs. Mögliche Rückgabewerte sind xlPageBreakFull - Gesamter Bildschirm, xlPageBreakPartial - Nur innerhalb des Druckbereichs.
Dim vpgbr As VPageBreak: Set vpgbr =
Dim xpbExtent As XlPageBreakExtent
xpbExtent = vpgbr.Extent
Location
Dim vpgbr As VPageBreak: Set vpgbr =
vpgbr.Location =
Type
Gibt einen XlPageBreak -Wert zurück, der den Seiten umbruchtyp darstellt, oder legt diesen fest. Mögliche Rückgabewerte sind xlPageBreakAutomatic - Seitenumbrüche werden von Excel automatisch hinzugefügt, xlPageBreakManual - Seitenumbrüche werden manuell eingefügt, xlPageBreakNone.
Dim vpgbr As VPageBreak: Set vpgbr =
vpgbr.Type = xlPageBreakAutomatic