Userform TxtBoxen ansprechen
13.05.2003 10:34:36
Florian
ich möchte per Schleife und den daraus resultierenden Treffern 10 Textboxen, die sich nur durch die Endnummer unterscheiden füllen und es klappt nicht.
Hier mein Versuch:
for i = 1 to 60
If Left(Frm_Kostenuebersicht.ComboBox1.Text, 6) = Left(ActiveSheet.Range("a" & i).Value, 6) And ActiveSheet.Range("b" & i).Value = "Nachtrag" Then
for j = 1 to 10
Frm_Kostenuebersicht.Txtbox_NVAuftragsnummer& j.Text = ActiveSheet.Range("a" & i).Value
next j
End If
Next i
Es scheitert, glaube ich, an der jSchleife und der Zuweisung des Textboxnamens, aber ich weiß nicht, wie ich es sonst machen soll.
Vielen Dank für Hilfe,
Florian