VBA – Programmierung mit Excel Grundlagen

Auswahl von Zellen und Zellbereichen
oder einfacher (ohne Zählvariable):
Sub Testen()
For Each TabBlatt In Worksheets
TabBlatt.Cells(2, 2).Formula = "=A1*0.5"
Next
End Sub
Beide Subs setzen die Formel =A1*0.5 in die Zelle B2 aller Tabellenblätter der aktiven
Arbeitsmappe ein.
Alternative 2
Die Blattauswahl über Namen des Tabellenblattes ist auf drei Wegen möglich:
1. Das schon weiter oben beschriebene Aktivieren des Tabellenblattes:
Worksheets("Tabelle1").Activate
Worksheets("WS99/2000").Activate
2. Über direkte Angabe der Objektreferenz, die allerdings relativ lange Anweisungen
erzeugen kann:
Worksheets("Tabelle1").Cells(3,5).Value = 233
3. Über Objektvariablen (vorher deklarieren !)
Sub Testen()
Dim TBName
Set TBNAme = Worksheets("Statistik 99")
TBName.Cells(3,5).Value = 233
End Sub
✘ Alle drei Lösungen sind gleichwertig, wegen der kürzeren Schreibweise wird
allerdings oft die Auswahl über Objektvariable (3) bevorzugt.
• Zugriff auf Arbeitsmappen
Sind mehrere Arbeitsmappen geöffnet, wird i.d.R. nur in einer gearbeitet (eine
Arbeitsmappe ist aktiv). Allerdings muß ein Wechsel zwischen Arbeitsmappen möglich
sein. Über die Auflistung WORKBOOKS kann der Wechsel realisiert werden:
Workbooks("Mappe1.xls").Worksheets("Tabelle2").Activate
Workbooks("Probe.xls").Worksheets("Tabelle1").Activate
Weil WORKBOOKS eine Auflistung ist, kann auch mit Indizes gearbeitet werden:
Workbooks(1).Worksheets("Tabelle2").Activate
Workbooks(2).Worksheets("Tabelle1").Activate
Dabei stehen die Indizes für die Reihenfolge, in der die Arbeitsmappen geöffnet wurden.
10 Manipulation von Zellen und Zellbereichen
Der Zugriff auf Zellen oder Zellbereiche ist nicht trivial, weil VBA mit zahlreichen, inhaltlich
ähnlichen Begriffen und Objekten arbeitet. Viele Operationen sind auf unterschiedlichen
Wegen realisierbar.
Einige der im folgenden vorzustellenden Techniken sind schon in früheren Kapiteln,
zumindest in den Beispielen in kurzer Form vorgestellt werden. Sie werden hier, der
Vollständigkeit halber evtl. nochmals erwähnt.
10.1 Auswahl von Zellen und Zellbereichen
Für die Auswahl (markieren, selektieren) von einzelnen Zellen oder Zellbereichen wird die in
vielen Beispielen schon verwendetet Methode ACTIVATE verwendet.
Range("A3").Activate
Range("B1:D4").Activate
Seite 73