DIM und SET in einer Schleife?
18.10.2006 12:23:02
Martin
ich habe in einer Tabelle mehrere benannte Bereiche, die sich im Namen nur um eine laufende Nummer unterscheiden (z.B.:Bereich_1, Bereich_2,...). Diese Bereiche möchte in VBA weiterverwenden. Die maximale Laufnummer ist bekannt. Gibt es eine Möglichkeit die Objektvariablen über eine Schleife zu initialisieren und dann auch zu benennen? Ich stelle mit sowas vor:
for i = 1 to höchster_Index
DIM Bereich_i As Range
Set Bereich_i = Worksheets(1).Range("Bereich_i")
Next
Natürlich klappt das nicht, schon allein weil
"Bereich_" & CStr(i)
viele lustige Sonderzeichen hat, die DIM nicht verträgt.
Wer weiß Rat?
Danke
Martin