Herbers Excel-Forum - das Archiv

Combobox aus Spalten als Einträge & Leerzellen aus

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

Betrifft: Combobox aus Spalten als Einträge & Leerzellen aus
von: wolfgang

Geschrieben am: 07.04.2005 10:34:52
guten morgen zusammen
ich möchte zwei comboboxen in Abhängig von einander im Formular erstellen
dazu gibt hier schon genügend Lösungsansätze
das Tabellenblatt ist eine Kreuztabelle aus einer Abfrage externer Daten
in Zeile 1 stehen die Überschriften (hier Länder)
in den entsprechenden Spalte die Einträge ( Hier z. b.: Städte)
jetzt mein Problem
1 . Rangeobject mit rowscoure zuweisen und Spalte als Einträge erhalten
Zeile der Arbeitsmappe enthält ab Spalte 2 die Überschriften (Länder)
Ausschnitt
####
'CB_Country und CB_Stadt sind Typ combobox
'
Dim Überschriften As Range
Private Sub UserForm_Initialize()
Set Überschriften = Range(Cells(1, 2), _
Cells(1, Cells(1, 2).CurrentRegion.Columns.Count))
Country.RowSource = Überschriften.Address
End Sub

#####
Beim Einlesen bekomme ich einen Eintrag mit mehrer Spalten
läst sich diese mit einer Funktion ähnlich 'transpose' umwandeln ??
(ohne Vor-Next-Schleife mit additem)

2
Problem Leerzellen und Dublikate in den Einträgen
####
Private Sub CB_Country_Change()
Spalte = CB_Country.ListIndex
CB_Stadt.RowSource = Range(Cells(2, Spalte), _
Cells(200, Spalte)).Address
End Sub

in dem Bereich können doppelte und Leerzellen sein
hilft hier auch nur For-Next mit additem und Abfrage "wenn nicht leer"
gerne würde ich die Einträge auch sortieren
viele Dank für jeden Lösungsansatz
und natürlich auch einen besonderen Dank an Herrn Herber der hier schon eine gewaltige Sammlung geschaffen hat
Gruß Wolfgang
Bild

Betrifft: AW: Combobox aus Spalten als Einträge & Leerzellen aus
von: Rolf Beißner

Geschrieben am: 07.04.2005 14:29:53
Hallo Wolfgang,
du könntest z.B. die Einträge der beiden
Spalten in jeweils ein Datenfeld (z.B. A und B)
einlesen, dabei die Leerfelder ausschließen
und mit ComboBox1.List=A, ComboBox2.List=B zuweisen.
fG
Rolf
 Bild
Excel-Beispiele zum Thema "Combobox aus Spalten als Einträge & Leerzellen aus"
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