UF ComboBox füllen & in TextBox übergeben
Heinz
Stehe leider schon wieder daneben.
Die Combobox1 habe mit Werten aus Sheets "Artikeln" A2:A100 gefüllt.
Nun möchte ich aber das die TextBox6 abhängig vonCombobox1 mit Werten aus Spalte 2 (B) gefüllt wird.
etwa mit Cells 2
Könnte mir bitte jemand helfen?
Gruß
Heinz
Private Sub ComboBox1_Change()
Me.TextBox6.Text = ComboBox1.Value
End Sub
Private Sub Userform_Activate()
With ComboBox1
.Clear
.List = UniqueList(Sheets("Artikeln").Range("A2:A100"))
End With
End Sub
Anzeige