Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Variable Variable ;-)

Forumthread: Variable Variable ;-)

Variable Variable ;-)
24.02.2005 21:10:51
Heinz
Liebe Excellenten,
ich habe ein (für viele wahrscheinlich) kleines Problem.
Ich habe z.B. 5 Variablen
.... Var1 Var2 Var3 Var4 Var5 und natürlich "i"
Wie kann ich mit einer For -Next Schleife
Sinngemäß
For i = 1 to 5
Var1 = Range("C" & i).Value
Next i
... die 1 hinter "Var" so variabel gestalten, wie
"hinten" bei Range("C
so dass ich am Schluss alle 5 Varibalen mit einem
Wert versehen haben.
Ich freue mich auf Eure Vorschläge
und wünsche allen F-Teilnehmern einen schönen Abend.
Heinz
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Variable Variable ;-)
24.02.2005 21:17:21
chris
Dazu musst du dir Array schaffen.
Dim var(5)

Sub neu()
For i = 1 To 5
var(i) = Range("C" & i).Value
Next i
End Sub

Ps Rückmeldung bitte !
AW: Variable Variable ;-)
24.02.2005 21:43:10
Heinz
Hallo Chris,
irgendwie klappts nicht ....
Dim Var1 as Byte
...
Dim Var5 as Byte
Dim i as Byte
For i = 1 to 20
Var(i) = Range("C" & i).Value
Next i
Letztendlich würde ich gerne im lokalen
Fenster für meine 5 Variablen die zugewiesenen
Werte sehen .....
Hast Du eine Ahnung warum das nicht klappt?
Heinz
Anzeige
AW: Variable Variable ;-)
24.02.2005 21:49:58
chris
Also willst du meine Antwort nicht umsetzen ?
Jedes mal wenn du die nextschleife durchläufst erhöht sich die Variable i um eins.
Somit auch die Var weil ja da das i in -> () steht.
Also nicht so
Dim Var1 as Byte
Dim Var2 as Byte
Dim usw... as Byte
sondern so->
Dim var(5)

Sub neu()
For i = 1 To 5
var(i) = Range("C" & i).Value
Next i
MsgBox var(1) & " " & var(2) & " " & var(3) & " " & var(4) & " " & var(5)
End Sub

Anzeige
AW: Variable Variable ;-)
24.02.2005 22:01:25
Heinz
Hallo Chris,
sorry, ich hab das mit den Klammern nicht (so schnell)
geschnallt, aber jetzt klappt's.
Vielen Dank
Heinz
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige