Combobox Wert für Listbox
20.12.2022 15:13:58
oraculix
Hier die Arbeitsmappe:
https://www.herber.de/bbs/user/156857.xlsm
In meiner Userform1 habe ich eine Combobox1 und ein Image21.
Wenn ich einen Namen auswähle aus der Combobox1 dann erscheint das Image21.(Funktioniert gut)
Aber :
Ich habe auch eine Listbox1 und da bräuchte ich eure Hilfe.
Frage:
Wie kann ich die Listbox1 befüllen in Abhängigkeit mit der Auswahl der Combobox1?
Also ich möchte wenn ich in der Combobox1 einen Eintrag auswähle die zugehörige Spalte aus Tabelle1 in der Listbox1 sehen!
Option Explicit
Private Sub UserForm_Initialize()
With Me.ComboBox1
Me.ComboBox1.RowSource = "Tabelle1!JU2:JU4"
.ListIndex = 0 'Voreinstellung Combobox
End With
End Sub
Private Sub ComboBox1_Change()
UserForm1.Image21.Picture = LoadPicture("D:\EMDB\HTML\Schauspieler Bilder\" & ComboBox1 & _
".jpg")
End Sub
##############################
AB HIER BRÄCHTE ICH EURE HILFE
Private Sub Listbox1_Change()
Listbox1.Value = Combobox1 'So ungefähr stelle ich mir das vor, leider reicht mein Wissen nicht aus
End Sub
Oraculix
