Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
420to424
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
420to424
420to424
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

textbox listbox userform

textbox listbox userform
27.04.2004 23:21:19
mehmet
hallo forum

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

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: textbox listbox userform
27.04.2004 23:23:39
Ulf
Wieviel Spalten hat den die Listbox?
Ulf
AW: textbox listbox userform
27.04.2004 23:28:54
mehmet
hallo ulf
12

Die Datei https://www.herber.de/bbs/user/5779.xls wurde aus Datenschutzgründen gelöscht

gruss
AW: textbox listbox userform
27.04.2004 23:33:24
Ulf
Bei ungebundener Listbox ist die max. Spaltenzahl 10!
Ulf
AW: textbox listbox userform
27.04.2004 23:37:21
mehmet
wie kann ich das umgehen?
erweitern einer zusatz module?
gruss
AW: textbox listbox userform
27.04.2004 23:39:44
Ulf
Du musst die Listbox mit RowSource füllen, nicht List oder AddItem.
Ulf
AW: textbox listbox userform
27.04.2004 23:42:07
mehmet
hmm..
dumme frage!
wie geht das!
kannst du mir eine kleine start hilfe geben bitte
gruss
AW: textbox listbox userform
28.04.2004 00:11:00
Ulf

Private Sub FillList(intIndex As Integer)
'Liste füllen
Dim intC As Integer
'ich fülle die ListBox lieber so, weil flexibler und sicherer!
With ListBox1
.RowSource = "Tabelle1!A1:L21" 'NEU!!!!!!!!!!!!!!!!!!!!!!!!!!
.ListIndex = intIndex
''Ist nicht nötig, das durch .ListIndex = intIndex das Click- Ereignis
''ausgelöst wird
'  For intC = 1 To 4
'    Controls("Textbox" & intC) = .Column(intC - 1)
'    'Listeneinträge in Textboxen schreiben
'  Next
End With
End Sub

Die nächste Frage wird vermutlich sein, warum das mit dem Übernehmen nicht klappt, oder?
Ulf
Anzeige
AW: textbox listbox userform
28.04.2004 00:16:58
mehmet
super
alles klappt
nur die übernahme 8-)
kann man da noch was machen?
dank dir
gruss
AW: textbox listbox userform
28.04.2004 00:37:08
mehmet
super ulf
dank dir
klappt wunderbar
ich wünsche dir eine angenehme nacht
gruesse aus köln
mehmet

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige