So frieren sie fenster mit vba ein (mit beispielen)
Sie können die folgende Syntax in VBA verwenden, um bestimmte Bereiche in einem Excel-Arbeitsblatt einzufrieren:
Sub FreezeCertainPanes()
With ActiveWindow
If .FreezePanes Then .FreezePanes = False
.SplitColumn = 0
.SplitRow = 1
.FreezePanes = True
End With
End Sub
Das Argument .SplitColumn gibt die Anzahl der einzufrierenden Spalten (von links beginnend) an.
Das Argument .SplitRow gibt die Anzahl der Zeilen (von oben beginnend) an, die eingefroren werden sollen.
Dieses spezielle Makro friert nur die erste Zeile der Excel-Tabelle ein.
Die folgenden Beispiele zeigen, wie Sie diese Syntax in der Praxis mit der folgenden Excel-Tabelle anwenden können:
Beispiel 1: Frieren Sie die erste Zeile mit VBA ein
Wir können das folgende Makro erstellen, um die erste Zeile der Excel-Tabelle einzufrieren:
Sub FreezeCertainPanes()
With ActiveWindow
If .FreezePanes Then .FreezePanes = False
.SplitColumn = 0
.SplitRow = 1
.FreezePanes = True
End With
End Sub
Sobald dieses Makro ausgeführt wird, wird die erste Zeile des Blattes eingefroren:
Egal wie weit wir scrollen, die erste Zeile bleibt sichtbar.
Beispiel 2: Frieren Sie die erste Spalte mit VBA ein
Wir können das folgende Makro erstellen, um die erste Zeile der Excel-Tabelle einzufrieren:
Sub FreezeCertainPanes()
With ActiveWindow
If .FreezePanes Then .FreezePanes = False
.SplitColumn = 1
.SplitRow = 0
.FreezePanes = True
End With
End Sub
Sobald dieses Makro ausgeführt wird, friert die erste Spalte des Blattes ein:
Unabhängig von der zurückgelegten Strecke bleibt die erste Spalte sichtbar.
Beispiel 3: Bestimmte Zeilen und Spalten mit VBA einfrieren
Wir können das folgende Makro erstellen, um die ersten drei Zeilen und die ersten beiden Spalten der Excel-Tabelle einzufrieren:
Sub FreezeCertainPanes()
With ActiveWindow
If .FreezePanes Then .FreezePanes = False
.SplitColumn = 2
.SplitRow = 3
.FreezePanes = True
End With
End Sub
Sobald dieses Makro ausgeführt wird, werden die ersten 3 Zeilen und die ersten 2 Spalten des Blattes eingefroren:
Unabhängig von der zurückgelegten Distanz bleiben die ersten 3 Zeilen und die ersten 2 Spalten sichtbar.
Zusätzliche Ressourcen
In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:
VBA: So finden Sie die zuletzt verwendete Zeile
VBA: So finden Sie die zuletzt verwendete Spalte
VBA: So fügen Sie mehrere Zeilen ein