Dropdown Liste mit Mehrfachauswahl
Standardmäßig kann in einem Dropdownfeld nur ein Eintrag ausgewählt werden
(Daten -> Datentools -> Datenüberprüfung).
Ein dynamisches Dropdownfeld kann folgendermaßen realisiert werden
abhängige, dynamische Dropdownfelder können folgendermaßen in Excel realisiert werden
weiterführende Informationen siehe hier
Um eine Mehrfachauswahl zu realisieren, kann der folgende VBA-Code im betreffenden Arbeitsblatt verwendet werden (rechte Maustaste auf Arbeitsblatt -> Code einfügen).
--- SCHNIPP --
(Daten -> Datentools -> Datenüberprüfung).
Ein dynamisches Dropdownfeld kann folgendermaßen realisiert werden
abhängige, dynamische Dropdownfelder können folgendermaßen in Excel realisiert werden
weiterführende Informationen siehe hier
Um eine Mehrfachauswahl zu realisieren, kann der folgende VBA-Code im betreffenden Arbeitsblatt verwendet werden (rechte Maustaste auf Arbeitsblatt -> Code einfügen).
--- SCHNIPP --
Private Sub Worksheet_Change(ByVal Target As Range) '** Mehrfachauswahl über DropDown-Liste (Gültigkeitsprüfung) '** Einfügen im Code-Container des betreffenden Arbeitsblattes '** Dimensionierung der Variablen Dim rngDV As Range Dim wert_old As String Dim wertnew As String '** Errorhandling On Error GoTo Errorhandling '** Mehrfachauswahl im definierten Bereich (Bsp. B4:B14) durchführen If Not Application.Intersect(Target, Range("B4:B14")) Is Nothing Then '**Range definieren Set rngDV = Target.SpecialCells(xlCellTypeAllValidation) If rngDV Is Nothing Then GoTo Errorhandling '** Prüfen, ob eine gültige Zelle ausgewählt wurde und Werte eintragen If Not Application.Intersect(Target, rngDV) Is Nothing Then Application.EnableEvents = False wertnew = Target.Value Application.Undo wertold = Target.Value Target.Value = wertnew If wertold <> "" Then If wertnew <> "" Then Target.Value = wertold & ", " & wertnew End If End If End If Application.EnableEvents = True End If Errorhandling: Application.EnableEvents = True End Sub
--- SCHNAPP ---
detaillierte Informationen finden Sie unter folgendem link
http://www.excel-inside.de/funktionen-a-tipps/895-dropdown-liste-mit-mehrfachauswahl
Vielen Dank.
AntwortenLöschenFunktioniert hervorragend.
Aber ich habe in der gleichen Mappe in der ich deinen VBA-Code nutze eine weitere Spalte in der ich eine Mehrfachauswahl benötige.
Welche Ergänzung benötigt der Code?
Wäre es einfacher die Mehrfachauswahl für die gesamte Mappe freizugeben?
Danke und Grüße
Jan
Der Ansatz mit VBA ist an ein Worksheet Objekt = Excel Tabellenblatt gebunden. D.h. der VBA Code muß für jedes Excel Tabellenblatt einkopiert werden, in welchem eine Mehrfachauswahl umgesetzt werden soll
AntwortenLöschen