Level
B | |
1 | normale Excel/VBA-Kenntnisse |
Formeln der Tabelle | ||||
|
Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Folgende Ausgangslage:
Ich fülle die Listbox1 mit Daten. (MultiSelect=1)
Nun möchte ich die angewählten Daten in der Reihenfolge in die Combobox1 schreiben, wie ich sie der Reihe nach in der Listbox ausgewählt habe.
So fülle ich die Combobox Private Sub CommandButton1_Click() Dim i& ComboBox1.Clear lblprodukt.Caption = "" With ListBox1 For i = 0 To .ListCount - 1 If .Selected(i) = True Then ComboBox1.AddItem .List(i) .Selected(i) = False End If Next End With ComboBox1.Text = "Hier Produkt wählen ..." ComboBox1.DropDown End Sub Ist das irgendwie machbar? Ich komm nicht drauf.
Ich möchte die Daten aber nicht einzeln einlesen, sondern es sollen erst alle Produkte in der Listbox angeklickt werden bevor sie in der Combobox als Aufträge zur Verfügung stehen.
Nur möchte ich eben in genau der angeklickten Reihenfolge in der Listbox die Daten in die Combobox schreiben.
Zum besseren Verständnis:
Klicke ich in Listbox1 zuerst z.B. den 5.Eintrag an und dannach den 2. Eintrag, so soll in der Combobox
auch diese korrekte Reihenfolge stehen.
Habt Ihr eine Idee, oder lässt sich das auf diesem Weg so nicht umsetzen?
Danke schon mal fürs Lesen
Gruß Matthias