VBA – Programmierung mit Excel Grundlagen

Seite 70
Tabellennavigation
Einzelzellen oder Zellbereichen sein. Überschneiden sich die Bereiche, wird die
Vereinigungsmenge genommen.
Worksheets("Testtabelle").Range("B1", "D3")
Worksheets("Testtabelle").Range("B1:C3", "C1:E5")
✘ Die erste Anweisung arbeitet mit dem Zellbereich B1:D3, die zweite mit dem Bereich, der
aus der Vereinigung der Bereiche B1:C3 und C1:E5, also dem Bereich B1:E5.
➨ Solange im aktiven Tabellenblatt gearbeitet wird, benötigt die Range – Methode das
Worksheet – Objekt nicht. Damit Verkürzen sich die Anweisungen, z.B. zu:
Range("M4:N7")
Range("B1:D3 D1:E3")
Range("B1:C3", "C1:E5")
9.1.2 Positionierung über die Cells - Eigenschaft
Im Unterschied zu der Positionierung über die RANGE – Eigenschaft bietet diese Alternative
die Möglichkeit, bei der Positionierung Zeilen- und Spaltenindizes zu verwenden, was
insbesondere für berechnete Zelladressen oder die Benutzung von Variablen für
Zelladressen ein großer Vorteil ist. Auch hier sind mehrere Syntaxvarianten möglich:
Objekt.Calls(RowIndex, ColumnIndex)
Object.Cells(Index)
Object.Cells
• Manuelle Eingabe der Zellindizes
Die erste Variante wird zur Ermittlung von Adressen einzelner Zellen benutzt. ROWINDEX
steht für den Zeilenindex, COLUMNINDEX für den Spaltenindex der Zelle. Für die
Zuweisung eines Wertes an die Zelle B2 der Tabelle1 steht dann beispielsweise
Worksheets(1).Cells(2,2).Value = 233
Die zweite Variante ermittelt ebenfalls eine Zelle. INDEX ist hier die „laufende Nummer“
einer Zelle im Tabellenblatt. Die Zählung beginnt mit der Zelle A1 (Index = 1), für letzte
Zelle der ersten Zeile gilt Index = 256, A2 hat den Indexwert 257, usw.. Somit hätte die
obige Anweisung in dieser Syntaxvariante die Form:
Worksheets(1).Cells(258).Value = 233
Die dritte Variante gibt eine Liste aller Zellen eines Tabellenblattes zurück. Sie wird
benutzt für Methoden und Eigenschaften die Formatierungen an Zellen übergeben, aber
nicht mit WORKSHHEET – Objekten (Tabellenblätter), sondern nur mit RANGE – Objekten
arbeiten.
Für das Entfernen der Hintegrundmuster aus Zellen eines Tabellenblattes könnte (!) die
Anweisung
Worksheets(1).Interior.Pattern = xlNone
benutzt werden, die jedoch nicht den gewünschten Effekt liefert (Laufzeitfehler 438). Weil
die INTERIOR – Eigenschaft nur RANGE – Objekte akzeptiert muß mit CELLS ein Range –
Objekt erzeugt werden:
Worksheets(1).Cells.Interior.Pattern = xlNone
➨ Solange im aktiven Tabellenblatt gearbeitet wird, benötigt die CELLS – Eigenschaft,
wie die schon oben vorgestellte RANGE - Methode das WORKSHEET – Objekt nicht.