Schleifenproblem
22.06.2004 08:32:10
Brit
Ich möchte in einer Schleife mehrere Felder einer Userform ansprechen und mit ihnen rechnen.
Wie erfolgt die Schreibweise mit - i - ? Dort bringt er mir immer eine Fehlermeldung! Ist es falsch geschrieben?
Dim t
Dim i
Dim i2
t = 0
i = 1
i2 = 2
Dim zähler
zähler = 0
Do While i If PZerg.RP & i.Value + PZerg.BP & i2.Value > 200 Then
t = 200
Else
t = -200
End If
PZerg.RP& i2.Value = PZerg.RP & i.Value + PZerg.BP & i2.Value
zähler = zähler + t
i = i + 1
i2 = i2 + 1
Loop
MsgBox zähler
Danke an alle fleißigen Helfer.
Brit