Auswahl aus mehreren Dropdowns in liste nacheinander erscheinen lassen

[Niko]

Hallo an alle,

wie kann ich aus verschiedenen Dropdown Menüs, deren Werte in einer Liste nacheinander erscheinen Lassen und die leeren (Leer = None) DropDown menüs weg lassen?

Habe ein Beispiel Datei eingefügt: 
  Mehrfachauswahl.xlsm (Größe: 22,12 KB / Downloads: 5)


Danke in Voraus,

  Niko

[{Boris}]

Hi,

liste in einer Hilfsspalte alle Dropdowns per einfacher Zellverknüpfung auf:

S1: =C6
S2: =C9
S3: = C12
...usw
S15: =J9

Dann in J13 diese Formel

=WENNFEHLER(INDEX(S:S;AGGREGAT(15;6;ZEILE($1:$15)/(S$1:S$15<>"None");ZEILEN($1:1)));"")

und runterkopieren.

[Niko]

Danke...Super!! 

Wenn ich mir eine Zusatzfrage erlauben darf...wäre dies möglich auch mit VBA? ...wenn Ja, wie würde der Code aussehen?

Danke nochmals.

[{Boris}]

Hi,

vergib Deinen Dropdownzellen den Namen "Dropdowns":

Code:

Sub til()
Dim C As Range, x As Long
x = 13
Range("J13:J26").ClearContents
For Each C In Range("Dropdowns")
    If C <> "None" Then
        Cells(x, "J") = C
        x = x + 1
    End If
Next C
End Sub

[Niko]

 Danke