Frage zur ListBox

Forumthread: Frage zur ListBox
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Frage zur ListBox

Frage zur ListBox

Frank

Hallo Zusammen!!!
Allen 'nen schönen Sonntag!!!
Meine Frage: In einer ListBox werden Suchergebnisse angezeigt. In der Spalte 1 der ListBox stehen dann immer Werte die unterschiedlich sind.
So z. Bsp. 12 / 1, 128 / 1, 128 / 1 / 1, 132 / 1 / 2
Ich übertrage diese Werte dann immer in die TextBox2. Aber in die TextBox1 soll immer nur die Zahl die vor dem ersten Schrägstrich steht eingetragen werden. Wie muss ich das anstellen?
Danke!!!
Gruß Frank H.!!!

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: Frage zur ListBox

Hajo_Zi
AW: Frage zur ListBox

Martin
AW: Frage zur ListBox

Frank
kleiner Ergänzung...

Martin

AW: Frage zur ListBox

04.03.2012 16:19:37

Hajo_Zi

Hallo Frank,
Textbox1=Left(Listbox1, Instr(listbox1,"/")-1)

AW: Frage zur ListBox

04.03.2012 16:44:18

Martin

Hallo Frank,
eine andere Möglichkeit wäre

Textbox1 = Trim(Split(Listbox1, "/")(0))

Viele Grüße
Martin

AW: Frage zur ListBox

04.03.2012 17:36:45

Frank

Hallo ihr zwei!
Durch Biathlon nun ein wenig abgelenkt, kommt erst jetzt mein ehrfürchtiger Dank!!!
Funzt beides!
Danke!!!
Gruß Frank H.!!!

kleiner Ergänzung...

04.03.2012 17:48:40

Martin

Hallo Frank,
bei meiner Lösung kannst du durch Änderung der Zahl in den Klammern den Ausschnitt wählen. Also hinsichtlich eines Beispiels "12 / 1, 128 / 1, 128 / 1 / 1, 132 / 1 / 2" sähe es dann so aus:
Textbox1 = Trim(Split(Listbox1, "/")(0)) ergibt 12
Textbox1 = Trim(Split(Listbox1, "/")(1)) ergibt 1, 128
Textbox1 = Trim(Split(Listbox1, "/")(2)) ergibt 1, 128
Textbox1 = Trim(Split(Listbox1, "/")(3)) ergibt 1
Textbox1 = Trim(Split(Listbox1, "/")(4)) ergibt 1, 132
Textbox1 = Trim(Split(Listbox1, "/")(5)) ergibt 1
Textbox1 = Trim(Split(Listbox1, "/")(5)) ergibt 2
Viele Grüße
Martin