Klasse Pane - einen Ausschnitt eines Fensters (Excel VBA)

Die Klasse Pane stellt einen Ausschnitt eines Fensters dar. Um eine Pane -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim pan as Pane
Set pan = ActiveWindow.ActivePane

For Each

Hier ist ein Beispiel für die Verarbeitung der Pane -Elemente in einer Sammlung

Dim pan As Pane
For Each pan In Application.Panes
	
Next pan

Activate

Aktiviert den Ausschnitt.

Liegt der Ausschnitt nicht im aktiven Fenster, wird das Fenster, zu dem der Ausschnitt gehört, ebenfalls aktiviert. Fixierte Ausschnitte können nicht aktiviert werden.

Dim booActivate As Boolean
booActivate = ActiveWindow.ActivePane.Activate()

Index

Gibt einen Long-Wert zurück, der die Indexnummer des Objekts in der Auflistung ähnlicher Objekte darstellt.

Dim lngIndex As Long
lngIndex = ActiveWindow.ActivePane.Index

LargeScroll

Führt seitenweise einen Bildlauf durch den Fensterinhalt aus.

Wenn sowohl down als auch up angegeben sind, wird der Inhalt des Fensters um den Unterschied der Argumente gescrollt. Wird sowohl ToLeft als auch ToRight festgelegt, wird der Fensterinhalt entsprechend der Differenz der beiden Argumente verschoben. Für jedes der Argumente kann auch eine negative Zahl festgelegt werden.

LargeScroll (Down, Up, ToRight, ToLeft)

ActiveWindow.ActivePane.LargeScroll

Arguments

Optional arguments

Die folgenden Argumente sind optional

Down (Long) - Die Anzahl von Seiten, um die der Bildlauf nach unten ausgeführt werden soll.

Up (Long) - Die Anzahl von Seiten, um die der Bildlauf nach oben ausgeführt werden soll.

ToRight (Long) - Die Anzahl von Seiten, um die der Bildlauf nach rechts ausgeführt werden soll.

ToLeft (Long) - Die Anzahl von Seiten, um die der Bildlauf nach links ausgeführt werden soll.

PointsToScreenPixelsX

Gibt einen Pixelpunkt auf dem Bildschirm zurück oder legt diesen fest.

PointsToScreenPixelsX (Points)

Points: Position des Pixels auf dem Bildschirm.

Dim lngPoints As Long: lngPoints = 
Dim lngPointsToScreenPixelsX As Long
lngPointsToScreenPixelsX = ActiveWindow.ActivePane.PointsToScreenPixelsX(Points:=lngPoints)

PointsToScreenPixelsY

Gibt die Position des Pixels auf dem Bildschirm zurück oder legt diese fest.

PointsToScreenPixelsY (Points)

Points: Position des Ausgangspunkts.

Dim lngPoints As Long: lngPoints = 
Dim lngPointsToScreenPixelsY As Long
lngPointsToScreenPixelsY = ActiveWindow.ActivePane.PointsToScreenPixelsY(Points:=lngPoints)

ScrollColumn

Gibt die Nummer der Spalte, die sich auf der linken Seite des Ausschnitts oder des Fensters befindet, zurück oder legt diese fest.

Wenn das Fenster geteilt wird, bezieht sich die ScrollColumn -Eigenschaft des Window -Objekts auf den oberen linken Bereich. Sind die Ausschnitte fixiert, schließt die ScrollColumn -Eigenschaft des Window -Objekts die fixierten Bereiche aus.

ActiveWindow.ActivePane.ScrollColumn =

ScrollIntoView

Verschiebt den Fensterinhalt des Dokumentfensters, sodass der Inhalt eines angegebenen rechteckigen Bereichs entweder in der oberen linken oder der unteren rechten Ecke des Dokumentfensters bzw. -fensterausschnitts angezeigt wird (dies hängt vom Wert des Arguments Start ab).

Das Start-Argument ist nützlich, um die Bildschirmanzeige auszurichten, wenn das Rechteck größer als das Dokumentfenster oder der -fensterausschnitt ist.

ScrollIntoView (Left, Top, Width, Height, Start)

ActiveWindow.ScrollIntoView _ 
 Left:=50, Top:=20, _ 
 Width:=100, Height:=200

Arguments

Hier sind die benannte Argumente :

Left (Long) - Die horizontale Position des Rechtecks (in Punkt) vom linken Rand des Dokumentfensters oder-Bereichs.

Top (Long) - Die vertikale Entfernung des Rechtecks (in Punkt) vom oberen Rand des Dokumentfensters oder -fensterausschnitts.

Width (Long) - Die Breite des Rechtecks in Punkt.

Height (Long) - Die Höhe des Rechtecks in Punkt.

Optional arguments

Das folgendes Argument ist optional

Start (Boolean) - True, um die linke obere Ecke des Rechtecks in der linken oberen Ecke des Dokumentfensters oder Fensterausschnitts anzuzeigen.

ScrollRow

Gibt die Nummer der Zeile, die sich auf der oberen Seite des Ausschnitts oder des Fensters befindet, zurück oder legt diese fest.

Wenn das Fenster geteilt wird, bezieht sich die ScrollRow -Eigenschaft des Window -Objekts auf den oberen linken Bereich. Wenn die Bereiche fixiert sind, schließt die Eigenschaft ScrollRow des Window-Objekts die fixierten Bereiche aus.

Worksheets("Sheet1").Activate 
ActiveWindow.ScrollRow = 10

SmallScroll

Führt einen zeilen- oder spaltenweisen Bildlauf für Fensterinhalte aus.

Wenn sowohl down als auch up angegeben sind, wird der Inhalt des Fensters um den Unterschied der Argumente gescrollt. Wenn __ sowohl ToLeft als auch ToRight angegeben werden, wird der Inhalt des Fensters um den Unterschied der Argumente gescrollt. __ Für jedes dieser Argumente kann auch eine negative Zahl festgelegt werden.

SmallScroll (Down, Up, ToRight, ToLeft)

ActiveWindow.ActivePane.SmallScroll

Arguments

Optional arguments

Die folgenden Argumente sind optional

Down (Long) - Die Anzahl der Zeilen, um die der Bildlauf nach unten ausgeführt werden soll.

Up (Long) - Die Anzahl der Zeilen, um die der Bildlauf nach oben ausgeführt werden soll.

ToRight (Long) - Die Anzahl der Zeilen, um die der Bildlauf nach rechts ausgeführt werden soll.

ToLeft (Long) - Die Anzahl der Zeilen, um die der Bildlauf nach links ausgeführt werden soll.

VisibleRange

Gibt ein Range -Objekt zurück, das den Bereich von Zellen darstellt, die im Fenster oder Bereich sichtbar sind.

Dim rngVisibleRange As Range
Set rngVisibleRange = ActiveWindow.ActivePane.VisibleRange