VBA - Bezug auf Spalten oder Zeilen in groï¿½en Tabellen

Bezug auf Spalten oder Zeilen in groï¿½en Tabellen

22.04.2002

In grï¿½ï¿½eren Tabellen mit vielen Spalten kann eine nachtrï¿½gliche
Anpassung des VBA-Codes mï¿½hselig sein, wenn beispielsweise eine
Spalte eingefï¿½gt oder gelï¿½scht wird.
Der Bezug zu den Spalten muss neu angepasst werden,
wenn Sie sich mittels Range(...) auf diese Spalten bezogen haben.

Ein kleiner Trick kann Ihnen viel Arbeit abnehmen,
wenn sich der Tabellenaufbau verï¿½ndert.
Vergeben Sie beispielsweise der ersten Zeile jeder Spalte
einen eindeutigen Namen. Auf diesen Namen kï¿½nnen Sie sich nun
mit VBA beziehen, auch wenn eine Spalte eingefï¿½gt oder gelï¿½scht wird.

Falsch:
Wert = Range ("Z10")

Richtig:
Wert = Cells(10,Range("Zellenname").Column)

Auch wenn Spalten verschoben werden,
der Name der Zelle wird mit verschoben.
VBA erkennt trotzdem, in welcher Spalte sich der Wert befindet.
Was mit Spalten geht, geht natï¿½rlich auch mit Zeilen:
Wert = Cells(Range("Zellenname").Row, 1)
Ebenso kombiniert:
Wert = Cells(Range("Zellenname").Row,Range("Zellenname").Column)
Was aber das gleiche wï¿½re wie:
Wert = Range("Zellenname").Value

Einer Zelle oder einem Bereich kï¿½nnen Sie Namen vergeben
ï¿½ber das Menï¿½ "Einfï¿½gen" - "Namen" - "Festlegen" oder aber
im "Namenfeld".