Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1288to1292
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Combobox mehrspaltig

Combobox mehrspaltig
30.11.2012 10:41:21
Gegga
Hallo
Habe folgendes Problem. Mit unten stehendem Code, habe ich seither meine Comboboxen aus einer Liste mit gesetztem Autofilter befüllt
Dim Bereich_CB_LIEF_1
Dim zelle_CB_LIEF_1 As Range
Set Bereich_CB_LIEF_1 = [LIEFERANTEN] ' = SHEET LIEFERANTEN SPALTE A ZEILE 3-50
For Each zelle_CB_LIEF_1 In Bereich_CB_LIEF_1
If zelle_CB_LIEF_1 "" And zelle_CB_LIEF_1.EntireRow.Hidden = False Then UF_START.CB_LIEF_1.AddItem zelle_CB_LIEF_1.Value
Next
Jetzt würde ich folgendes benötigen:
Ich will diese Combobox in eine 2 Spaltige umwandeln.
Dann sollen in die erste Spalte der Combobox die gefilterten Werte aus [LIEFERANTEN] eingetragen werden und und die 2te Spalte der Combobox jeweils den Wert der 3 Spalten rechts von dem in erster Spalte befüllten Wert.
Kann mir dabei jemand helfen? Komplettes Neuland für mich (wusste bis vor 3 Tagen nicht, das Comboboxen mehrspaltig befüllt werden können)
Gruß Gegga

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Combobox mehrspaltig
30.11.2012 11:30:02
Rudi
Hallo,
mit OffSet().
  Dim Bereich_CB_LIEF_1
Dim zelle_CB_LIEF_1 As Range
Set Bereich_CB_LIEF_1 = [LIEFERANTEN] ' = SHEET LIEFERANTEN SPALTE A ZEILE 3-50
For Each zelle_CB_LIEF_1 In Bereich_CB_LIEF_1
If zelle_CB_LIEF_1  "" And zelle_CB_LIEF_1.EntireRow.Hidden = False Then
With UF_START.CB_LIEF_1
.AddItem zelle_CB_LIEF_1.Value
.List(.ListCount - 1, 1) = zelle_CB_LIEF_1.Offset(, 2)
End With
End If
Next

Gruß
Rudi

AW: Combobox mehrspaltig
30.11.2012 15:25:58
Gegga
Rudi, vielen, vielen Dank!!!
Funktioniert wunderbar und mir eröffnen sich völlig neue Wege ;)
Greetz und a scheens Wochenende!!!

Anzeige
völlig neue Wege
30.11.2012 19:42:10
Rudi
Hallo,
ich bevorzuge, die Werte erst in einem Array zu sammeln und dann der .List-Eigenschaft der CBx zuzuweisen.
Gruß
Rudi

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige