ich möchte gerne sowas machen in etwa:
Sub Schleife()
Dim rho As Variant 'Dichte
Dim i As Variant 'Variable
For i = 1 To 23
If SysConfiguration.Controls("CB_Z" & i).Value "" And SysConfiguration.Controls("TB2_Z" & i) _
"" Then
rho(i) = Round(REFPROP.Density(SysConfiguration.Controls("CB_Z" & i).Value, "TP", "SI", Tein, _
pein), 2) * CDbl(SysConfiguration.Controls("TB2_Z" & i).Value)
Else
rho(i) = 0
End If
Next i
End Sub
SO! Die Frage ist: wie schreibe ich rho und i richtig damit die Schleife durchgelaufen wird? Habe nichts gefunden leider.Vielen Dank Vorab!