VBA – Programmierung mit Excel Grundlagen

Seite 84
Aktionen auf Tabellenblättern
11.2 Verschieben von Tabellenblättern
Die Reihenfolge der Tabellenblätter in einer Arbeitsmappe kann verändert werden. Die
Tabellenblätter können durch die Anweisungen
Worksheets("Tabelle1").Move after:=Worksheets("Tabelle3")
Worksheets("Daten").Move before:=Worksheets("Ergebnisse")
verschoben werden.
Die erste Anweisung verschiebt die Tabelle1 hinter die Tabelle3.
Die zweite Anweisung verschiebt die Tabelle Daten vor die Tabelle Ergebnisse
Die Anweisung
Worksheets("Tabelle9").Move After:=Worksheets(Worksheets.Count)
verschiebt das Tabellenblatt Tabelle9 ans Ende des Indexbereichs der Tabellenblätter
(Tabelle9 wird zur letzten Tabelle der Arbeitsmappe).
Worksheets.Add.Move After:=Worksheets(Worksheets.Count)
Die obige Anweisung ist ein „Sonderfall“ – sie fügt ein neues Tabellenblatt hinter dem aktiven
Blatt und verschiebt es gleichzeitig ans Ende des Blattregisters.
11.3 Tabellenblätter aktivieren
Tabellenblätter können individuell aktiviert werden (das aktive Blatt gewechselt werden).
Über eine Anweisung der Form:
Worksheets("Tabelle1").Activate
wird beispielsweise das Blatt Tabelle1 aktiviert.
Eine andere Art des Aktivierens kann das Verbergen bzw. wieder sichtbar machen von
Tabellenblättern sein. Tabellenblätter können „versteckt“ werden ( wenn sie beispielsweise
Daten enthalten, die nicht gesehen werden sollen). Dazu sind Anweisungen der folgenden
Form nötig:
Worksheets(1).Visible = False
Worksheets("Werte").Visible = False
Die erste der beiden Anweisungen benutzt den Indexwert der Blattauflistung, die zweite
arbeitet mit einem Blattnamen. In beiden Fällen wird das Tabellenblatt aus der Excel –
Oberfläche ausgeblendet (unsichtbar). Der Zugriff auf die darin enthaltenen Daten ist jedoch
weiterhin im vollen Umfang möglich.
Ausgeblendete Tabellenblätter werden mit:
Worksheets(1).Visible = true
Worksheets("Werte").Visible = true
wieder eingeblendet.