Note: The other languages of the website are Google-translated. Back to English

Wie wähle ich mehrere Elemente aus der Dropdown-Liste in eine Zelle in Excel aus?

Die Dropdown-Liste wird häufig in der täglichen Excel-Arbeit verwendet. Standardmäßig kann nur ein Element in einer Dropdown-Liste ausgewählt werden. In einigen Fällen müssen Sie jedoch möglicherweise mehrere Elemente aus der Dropdown-Liste in einer einzelnen Zelle auswählen (siehe Abbildung unten). Wie können Sie in Excel damit umgehen?

doc Wählen Sie mehrere Elemente aus der Dropdown-Liste 1 aus doc Pfeil rechts doc Wählen Sie mehrere Elemente aus der Dropdown-Liste 2 aus

Wählen Sie mehrere Elemente aus der Dropdown-Liste in einer Zelle mit VBA aus

Wählen Sie mit der praktischen Option von Kutools for Excel mehrere Elemente aus der Dropdown-Liste in einer Zelle aus


Wählen Sie mehrere Elemente aus der Dropdown-Liste in einer Zelle mit VBA aus

Hier sind einige VBA, die Ihnen bei der Lösung dieses Problems einen Gefallen tun können.

Wählen Sie doppelte Elemente aus der Dropdown-Liste in einer Zelle aus

1. Klicken Sie nach dem Erstellen einer Dropdown-Liste mit der rechten Maustaste auf die Registerkarte Blatt, um sie auszuwählen Code anzeigen in dem Kontextmenü.
doc Wählen Sie mehrere Elemente aus der Dropdown-Liste 3 aus

2. Dann in der Microsoft Visual Basic für Applikationen Fenster, kopieren Sie den folgenden Code und fügen Sie ihn in das leere Skript ein.

VBA: Wählen Sie mehrere Elemente aus der Dropdown-Liste in einer Zelle aus

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
    Dim xRgVal As Range
    Dim xStrNew As String
    On Error Resume Next
    Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
    If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
    If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    xStrNew = Target.Value
    Application.Undo
    If xStrNew = Target.Value Then
    Else
    xStrNew = xStrNew & " " & Target.Value
    Target.Value = xStrNew
    End If
    Application.EnableEvents = True
End Sub

3. Speichern Sie den Code und schließen Sie das Fenster, um zur Dropdown-Liste zurückzukehren. Jetzt können Sie mehrere Elemente aus der Dropdown-Liste auswählen.

Hinweis:

1. Mit dem VBA werden die Elemente nach Leerzeichen getrennt, die Sie ändern können xStrNew = xStrNew & "" & Zielwert an andere, um das Trennzeichen nach Bedarf zu ändern. Zum Beispiel, xStrNew = xStrNew & "," & Zielwert trennt die Elemente durch Kommas.

2. Dieser VBA-Code funktioniert für alle Dropdown-Listen im Blatt.

Wählen Sie mehrere Elemente aus der Dropdown-Liste in eine Zelle ohne Wiederholung aus

Wenn Sie nur eindeutige Elemente aus der Dropdown-Liste in eine Zelle auswählen möchten, können Sie die obigen Schritte wiederholen und den folgenden Code verwenden.

VBA: Wählen Sie mehrere Elemente ohne Wiederholung aus der Dropdown-Liste in eine Zelle aus

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
    Dim I As Integer
    Dim xRgVal As Range
    Dim xStrNew As String
    Dim xStrOld As String
    Dim xFlag As Boolean
    Dim xArr
    On Error Resume Next
    Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
    If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
    If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    xFlag = True
    xStrNew = " " & Target.Value & " "
    Application.Undo
    xStrOld = Target.Value
    If InStr(1, xStrOld, xStrNew) = 0 Then
        xStrNew = xStrNew & xStrOld & " "
    Else
        xStrNew = xStrOld
    End If
    Target.Value = xStrNew
    Application.EnableEvents = True
End Sub

Beide oben genannten VBA-Codes unterstützen nicht das Löschen von Teilen des Zellinhalts, sondern nur das Löschen aller Elemente der Zelle.


Wählen Sie mit der praktischen Option von Kutools for Excel mehrere Elemente aus der Dropdown-Liste in einer Zelle aus

Wenn Sie mit VBA-Code nicht vertraut sind, können Sie dies tun kostenlose Installation ein handliches Werkzeug - Kutools for Excel, die eine Gruppe von Dienstprogrammen zur Dropdown-Liste enthält, und es gibt eine Option Mehrfachauswahl Dropdown-Liste kann Ihnen helfen, einfach mehrere Elemente aus der Dropdown-Liste in einer Zelle auszuwählen.

Wählen Sie nach dem Erstellen der Dropdown-Liste die Dropdown-Listenzellen aus und klicken Sie auf Kutoolen > Dropdown-Liste > Mehrfachauswahl-Dropdown-Liste um dieses Dienstprogramm zu aktivieren.
doc kutools Multi-Select-Dropdown-Liste 1

Anschließend können für die ausgewählten Dropdown-Listenzellen mehrere Elemente in der Zelle ausgewählt werden.

Wenn Sie diese Option zum ersten Mal verwenden, können Sie die Einstellungen dieses Dienstprogramms nach Bedarf festlegen, bevor Sie dieses Dienstprogramm anwenden.

Klicken Sie Kutoolen > Dropdown-Liste > der Pfeil daneben Mehrfachauswahl-Dropdown-Liste > Einstellungen .
doc kutools Multi-Select-Dropdown-Liste 2

Dann in der Mehrfachauswahl Dropdown-Listeneinstellungen Dialog können Sie

1) Geben Sie den Anwendungsbereich nach Bedarf an.

2) Geben Sie die Richtung des Platzes an.

3) Geben Sie das Trennzeichen zwischen den Elementen an.

4) Geben Sie an, ob keine Duplikate hinzugefügt und doppelte Elemente entfernt werden sollen.

Klicken Sie Ok und klicken auf Kutoolen > Dropdown-Liste > Mehrfachauswahl-Dropdown-Liste um es zu bewirken.

Tipp: Um die anzuwenden Mehrfachauswahl-Dropdown-Liste Dienstprogramm, müssen Sie installieren es zuerst. Wenn Sie eine Dropdown-Liste mit mehreren Ebenen erstellen möchten, kann Ihnen das folgende Dienstprogramm helfen.

Erstellen Sie einfach eine dynamische Dropdown-Liste mit zwei oder mehreren Ebenen in Excel

In Excel ist das Erstellen einer Dropdown-Liste mit zwei oder mehreren Ebenen komplex. Hier das Dynamische Dropdown-Liste Nutzen von Kutools for Excel kann dir einen Gefallen tun. Sie müssen nur die Daten wie im gezeigten Beispiel bestellen, dann den Datenbereich und den Ausgabebereich auswählen und dann dem Dienstprogramm überlassen.  Klicken Sie für 30 Tage kostenlos testen!
doc erweiterte Kombinationszeilen
 
Kutools für Excel: mit mehr als 300 praktischen Excel-Add-Ins, die Sie ohne Einschränkung kostenlos ausprobieren können 30 Tage.

Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.
kte tab 201905

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
officetab unten
Kommentare (26)
Noch keine Bewertungen. Bewerten Sie als Erster!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Nach dem Hinzufügen der Daten aus der Dropdown-Liste funktioniert das Löschen nicht.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich habe das gleiche Problem gefunden. Ich glaube, ich habe einen Weg gefunden, es zu überwinden. Am Ende des Codes sehen Sie den Code "xStrNew = xStrOld". Sagen Sie stattdessen xStrNew = " "

Für mich geht das.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Gibt es eine Chance, dass du diesen Code noch hast? Ich versuche, das zu tun, was Sie gesagt haben, aber der Text wird immer noch dupliziert.
Vielen Dank
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Es tut mir leid, aber das tue ich nicht. Ich habe mir jedoch gerade den obigen Code angesehen und es scheint, dass der Autor den Code mit meinem Vorschlag bearbeitet hat.

Posten Sie Ihr Problem im Hauptthread zu diesem Artikel.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Fügen Sie im ersten Code die folgende Zeile zwischen Zeile 6 und 7 hinzu (10-11 im zweiten Code): Wenn Target.Value = "" Then Exit Sub
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich habe dieses "Wählen Sie mehrere Elemente aus der Dropdown-Liste in eine Zelle ohne Wiederholung" verwendet.
Das ist, was passiert ist
1. Mehrfachselektionen gehen problemlos.
2. Das Problem tritt auf, wenn ich versuche, eine Option zu bearbeiten und zu entfernen. Ich habe keine Möglichkeit, eine Option zu entfernen. es vermehrt sich ständig.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Wie würden Sie diese Funktionalität anwenden, aber so gestalten, dass es keine redundanten Werte gibt? Jede Hilfe wäre willkommen!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Wenn ich ein Blatt mit Dropdown-Liste mit Kontrollkästchen erstelle, gibt es eine Möglichkeit, diese Arbeitsmappe mit dieser Kontrollkästchenfunktion zu teilen?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich stelle auch fest, dass ich nach der Auswahl mehrerer Elemente mit dem aktualisierten VBA-Code die Zelle immer noch nicht löschen kann, sie multipliziert sich einfach weiter.
Hat jemand dafür schon eine Lösung?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, Rusty, den Code habe ich aktualisiert, um ihn stabiler zu machen. Da sich die Zelle jedoch in der Datenvalidierung befindet, leer ist die Datenvalidierung, kann der Code dieses Problem nicht lösen.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Der Code funktioniert, überträgt sich aber auf alle Zellen und multipliziert sich in den Zellen und erlaubt kein Löschen. Können Sie helfen?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Quando quero deletar alguma opção ou todas dá erro. Como posso Resolver?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hi! Como puedo usar este codigo para todo un worksheet y no solo para una pestana?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hi, Vero, Kutools for Excel's Multi-select Drop-down List-Funktion unterstützt die Auswahl mehrerer Elemente aus der Dropdown-Liste im gesamten Arbeitsblatt oder in der gesamten Arbeitsmappe, geben Sie einfach den angegebenen Bereich im Dialogfeld Multi-select Drop-down List Settings an.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Wie kann ich das für die von Ihnen bereitgestellte Faustformel tun :) Vielen Dank im Voraus!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
hallo,
selon le premier exemple tout fonctionne très bien jusqu'à ce que je verrouille la feuille.
quand la feuille est verrouillée, je n'ai plus le choix multiple !
wie geht das
merci par avance
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, tut mir leid. Wir werden unsere Funktion in der nächsten Version aktualisieren, um dieses Problem zu vermeiden. Vielen Dank für Ihr Feedback.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Merci bcp
Mais à quand la nouvelle version ?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, die neue Version ist in Planung, da die nächste Version mehrere Funktionen aktualisieren wird, kann es etwas dauern.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, wir haben diese Version für Sie aktualisiert, aber dies ist eine Beta-Version, bitte laden Sie sie hier herunter: https://download.extendoffice.com/downloads/Kutools-for-Excel/beta/26.10/KutoolsforExcelSetup.Inno.exe
Wenn es irgendwelche Probleme gibt, freuen wir uns über Ihr Feedback.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
danke,
Je vais la télécharger et essayer.
Bonne journée
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Der Code funktioniert, aber ich kann ihn nicht löschen. Kann jemand bitte den neuen Code posten?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
¿Cómo puedo hacer para que el orden en que se coloque el texto, sea tan cuál como yo quiera?

Beispiel:
Mi texto para la lista es:
TRAMITAR ESTE ASUNTO
KOORDINAR
ANALIZAR UND EMPFEHLUNG

sí selecciono:
TRAMITAR ESTE ASUNTO
ANALIZAR UND EMPFEHLUNG

Es erscheint mir
ANALIZAR UND EMPFEHLUNG, TRAMITAR ESTE ASUNTO

o meer, los de abajo me aparecen primero, pero quiero que sea en el orden en que voy seleccionando...
TRAMITAR ESTE ASUNTO, ANALIZAR UND EMPFEHLUNG.....
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, Gorgelys, die Multi-Select-Dropdown-Liste von Kutools kann Ihnen helfen. Die ausgewählten Elemente werden in der gewünschten Reihenfolge angezeigt.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Como posso utilizar a função com a planilha bloqueada?
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo, Makros, versuchen Sie den folgenden Code, er unterstützt die Auswahl mehrerer Elemente in der Dropdown-Liste im geschützten Blatt.
Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
    Dim xRgVal As Range
    Dim xStrNew As String
    On Error Resume Next  
    xType = 0
    xType = Target.Validation.Type
    If xType <> 3 Then Exit Sub
    If (Target.Count > 1) Then Exit Sub

    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    xStrNew = Target.Value
    Application.Undo
    If xStrNew = Target.Value Then
    Else
    xStrNew = xStrNew & " " & Target.Value
    Target.Value = xStrNew
    End If
    Application.EnableEvents = True
End Sub

Und auch Kutools für Excel 26.1 und spätere Versionen unterstützen diesen Job in einem geschützten Blatt.
Es sind noch keine Kommentare vorhanden
Hinterlassen Sie Ihre Kommentare
Als Gast posten
×
Bewerte diese Nachricht:
0   Figuren
Vorgeschlagene Standorte

Folgen Sie uns

Copyright © 2009 - www.extendoffice.com. | Alle Rechte vorbehalten. Unterstützt von ExtendOffice. | Sitemap
Microsoft und das Office-Logo sind Marken oder eingetragene Marken der Microsoft Corporation in den USA und / oder anderen Ländern.
Geschützt durch Sectigo SSL