ComboBox mit speziellen Feldern füllen
18.04.2013 15:10:56
Jörg
ich habe eine Spalte mit ca 25.000 Artieklbezeichnungen von denen ich in einer Combobox in einem UserForm nur die angezeigt bekommen möchte, die mit einem X enden.
Die ersten Comboboxen auf dem Formular habe ich folgendermaßen angesprochen:
Private Sub UserForm_Initialize()
Me.ComboBox1.RowSource = "Artikelnamen!A2:A25000"
End Sub
und den Wert über
Private Sub ComboBox1_click() 'Artikelname
strTeil = (ComboBox1.Value)
End Sub
herausgezogen. Optimal ist es noch nicht aber einen dynamische Aopassung an die tatsächliche Länge der Tabelle sollte kein Problem darstellen, ist glücklicherweise an vielen Ecken beschrieben.
Wie ich mit meiner ComboBox 6 und den Artikeln die mit X enden verfahren soll weiß ich derzeit leider noch nicht.
Vielen Dank schon einmal für eure Hilfe
Jörg