textbox listbox userform
28.04.2004 01:21:19
mehmet
Private Sub ListBox1_Click()
Dim intC As integer
For intC = 1 To 4 'versuch bis 12 statt 4
Controls("Textbox" & intC) = ListBox1.Column(intC - 1)'Listeneinträge in Textboxen schreiben
Next
End Sub
dieser code läüft auf bis zu textbox4
wenn ich aber die zahl hoch setzen möchte,
erscheint ein fehler!
[eigenschaft column konnte nicht abgerufen werden. ungültiges argument.]
warum?
gruss
mehmet
Anzeige