Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1112to1116
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Fortlaufende Nummer für eine Variable

Fortlaufende Nummer für eine Variable
Dieterlem
Hallo Excelfreunde,
innerhalb einer Schleife möchte ich mehrere Variablen Deklarieren und einen Bereich zuweisen.
Hier ein kleiner Test dazu:
Dim i As Byte
Dim Anzahl as Byte
For i = 1 To Anzahl
Dim Bereich(i) As Range
Set Bereich(i) = .Range(.Cells(1, 1), .Cells(i, 1))
Bereich(i).Select
Next i
Gruß
Dieterlem

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Wo ist das Problem?
07.11.2009 17:35:44
Daniel
Hi
vielleicht solltest du noch beschreiben, wo das Problem liegt.
damit dein Makro lauifen könnte, müsste man es so ändern:
Dim i As Byte
Dim Anzahl as Byte
Djm Bereich() as range
Anzahl = ? 'Hier Wert eingeben
redim Bereich(1 to Anzahl) as Range
For i = 1 To Anzahl
Set Bereich(i) = .Range(.Cells(1, 1), .Cells(i, 1))
Bereich(i).Select
Next i
Gruß. Daniel
AW: Getestet
07.11.2009 18:14:27
Gerd
Hallo Dieter,
du kannst das eindimensionale Datenfeld auch konstant deklarieren,
z.B. mit der Dim - Anweisung.
Und zu den Punkt-Verweisen gehört ein With - EndWith - Block.
Sub Salamander()
Dim i As Integer
Dim Bereich(1 To 9) As Range
With ActiveSheet
For i = LBound(Bereich) To UBound(Bereich)
Set Bereich(i) = .Range(.Cells(1, 1), .Cells(i, 1))
Next i
End With
For i = LBound(Bereich) To UBound(Bereich)
MsgBox Bereich(i).Address
Next
End Sub
Gruß Gerd
Anzeige

127 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige