Herbers Excel-Forum - das Archiv

Combobox in Userform problem

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Combobox in Userform problem
von: Sylvio

Geschrieben am: 18.03.2005 17:24:44
Hallo!
habe da ein kleines Problem mit der Combobox in meiner Userform!
Habe eine Arbeitsm. mit 3 Tabellen (1,2,3) auf der ersten Tab. Ist ein Button zum aufrufen der UserForm. Die Combobox heißt bei mir CB1 und soll mir die Namen aus Tab.2 Zelle (besser währe aus Spalte) A4 bis A500 anzeigen das macht sie mit der Change Anweisung auch nur jeden Namen habe ich jetzt doppelt und dreifach dazustehen.
Wo liegt das Problem?
Danke für Hilfen!
MfG Sylvio


      
Private Sub CB1_Change()
Dim zelle As Range
For Each zelle In Workbooks("Mappe1.xls").Worksheets("Tabelle2").Range("A4:A500")
      
If zelle.Value <> "" Then
         UserForm1.CB1.AddItem zelle.Value
      
End If
Next zelle
End Sub 

     Code eingefügt mit Syntaxhighlighter 3.0

Bild

Betrifft: AW: Combobox in Userform problem
von: GraFri
Geschrieben am: 18.03.2005 17:40:41
Hallo
Jedesmal, wenn du die Combobox änderst, werden die Werte neu eingelesen.
Besser bei Aufruf der Userform einlesen.
Den Code in die Sub Userform_Initialize() einfügen.

Bei weiteren Fragen einfach melden.
mfg, GraFri
Bild

Betrifft: AW: Combobox in Userform problem
von: Sylvio
Geschrieben am: 18.03.2005 18:11:23
Hallo GraFri,
danke für die schnelle Hilfe
hab es gleich geändert und funzt!!!
Frage : wie muss ich das für weitere schreiben ?
CB1 - für Zelle A4:A500
CB2 - für Zelle B2:B500
Bild

Betrifft: AW: weitere Combobox und Filter
von: Sylvio
Geschrieben am: 19.03.2005 10:25:41
Hallo
wie kann ich weitere CB in den Code einbinden und gleiche werte nur einmal anzeigen lassen???
CB1 - für Zelle A4:A500 ( wert - Meier,Müller,Schulze,Meier = Meier nur 1x usw.)
CB2 - für Zelle B2:B500
MfG Sylvio
Bild

Betrifft: AW: keine Lösung??
von: Sylvio
Geschrieben am: 20.03.2005 19:38:56
Hallo,
Hatt keiner eine Lösung zu meiner Frage ??
Mfg Sylvio
 Bild
Excel-Beispiele zum Thema "Combobox in Userform problem"
ComboBox als Symbol Alle ComboBoxes auf Position 1
Werte in eine ComboBox einer UserForm übernehmen ComboBox in Abhängigkeit einer 2. ComboBox ein-/ausblenden
ComboBox mit Monatsnamen füllen Mehrspaltige ComboBox
ComboBox2 in Abhängigkeit von ComboBox1 bestücken Nur Zellen mit Inhalt in ComboBox listen
Neue UserForm bedingt nach ComboBox-Auswahl aufrufen Neues Element in ComboBox