array befüllen
10.08.2007 15:24:32
Thomas
ich würde gern ein leeres Array mit einer bestimmten Anzahl von Elementen befüllen,
welche aber variabel (siehe arrende) sind.
Nun bringt er mir die Fehlermeldung: Konstante benötigt
Wie kann ich mein Vba Code ändern?
arrende = Cells(Rows.Count, 1).End(xlUp).Row - ActiveCell.Row + 1
Worksheets("Tmp").Activate
Dim a(1 To arrende) As Variant
For afill = 1 To arrende
a(afill) = [E6]
Next afill
Gruss und Danke Tom