Liebes Forum!
Wahrscheinlich fällt euch die Lösung ja ganz leicht:
Ich will im Zuge einer Schleife bei jedem Durchlauf eine Variable ausgeben. Damit die Variable nicht jedes Mal überschrieben wird, soll sie beim ersten Mal "Var1", beim zweiten Mal "Var2" usw. heißen
So funktioniert's ja sicher nicht:
_____________________________________________________
i = 1
Do Until i = 3
"Var" & i = ActiveCell.Value
ActiveCell.Offset(0, 1).Select
i = i + 1
Loop
_____________________________________________________
Ich glaub, man erkennt aber daraus ganz gut, was ich machen möchte. In den vorhandenen Einträgen find ich folgende Möglichkeit:
_____________________________________________________
Dim VarNr As String
VarNr = "RefStat" & i
Me.Controls(VarNr).Value = ActiveCell.Value
_____________________________________________________
Aber VB mag das "Me" nicht und ich weiß auch nicht, wozu es dient.
Ich hoffe auf eure Hilfe! Danke!
JoHi |