Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

listbox in textfelder übertragen

Forumthread: listbox in textfelder übertragen

listbox in textfelder übertragen
07.02.2003 14:38:39
Andi
Hallo zusammen,

kann mir jemand sagen was hierdran falsch ist?
Ich möchte daten aus einer Listbox in textfelder einlesen,
beim ersten textfeld funktioniert das auch noch aber beim zweiten macht er mir nen fehler.
Code sieht so aus:

Private Sub ListBox1_Click()
TextBox1.Text = ListBox1.List(ListBox1.ListIndex, 0)
TextBox2.Text = ListBox1.List(ListBox2.ListIndex, 1) <--Fehler
TextBox3.Text = ListBox1.List(ListBox3.ListIndex, 2)
TextBox4.Text = ListBox1.List(ListBox4.ListIndex, 3)
End Sub

Private Sub UserForm_Initialize()
With ListBox1
.RowSource = "Mitarbeiter_Stamm!A2:D" & Sheets("Mitarbeiter_Stamm").Range("D2").CurrentRegion.Rows.Count
.ColumnCount = 4
.ColumnWidths = "75;75;0;0"
End With
End Sub

Kann mir jemand sagen was ich falsch mache?
gruss Andi

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: listbox in textfelder übertragen
07.02.2003 15:28:46
L.Vira

Das sind aber 4 Listboxen, sollte es nich immer Listbox1 heißen?
Private Sub ListBox1_Click()
TextBox1.Text = ListBox1.List(ListBox1.ListIndex, 0)
TextBox2.Text = ListBox1.List(ListBox2.ListIndex, 1) <--Fehler
TextBox3.Text = ListBox1.List(ListBox3.ListIndex, 2)
TextBox4.Text = ListBox1.List(ListBox4.ListIndex, 3)
End Sub


Anzeige
Re: listbox in textfelder übertragen
07.02.2003 22:58:05
GS

Du hast doch nur eine Listbox, oder ? Warum dann ListBox2.ListIndex, ListBox3..... ? Immer schön bei ListBox1 bleiben ;-)

Private Sub ListBox1_Click()
TextBox1.Text = ListBox1.List(ListBox1.ListIndex, 0)
TextBox2.Text = ListBox1.List(ListBox1.ListIndex, 1)
TextBox3.Text = ListBox1.List(ListBox1.ListIndex, 2)
TextBox4.Text = ListBox1.List(ListBox1.ListIndex, 3)
End Sub

Gruß
GS


Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige