Zum Hauptinhalt springen

Kutools für Office — Eine Suite. Fünf Tools. Erledigen Sie mehr.

Wie fügt man eine farbcodierte Dropdown-Liste in einer Word-Tabelle ein?

Author Xiaoyang Last modified

Angenommen, Sie haben eine Tabelle in Ihrem Word-Dokument und möchten nun eine farbcodierte Dropdown-Liste in einer Spalte der Tabelle einfügen. Das bedeutet, wenn Sie eine Option aus der Dropdown-Liste auswählen, wird die Zellenfarbe rot, und wenn Sie eine andere auswählen, wird die Zellenfarbe grün, wie im folgenden Screenshot gezeigt:

Demo showing a cell's color changing when an item is selected from the drop-down list

Farbcodierte Dropdown-Liste in einem Word-Dokument mit VBA-Code einfügen

Die folgenden Schritte führen Sie durch das Einfügen einer Dropdown-Liste in eine Tabellenzelle und das Anwenden einer Hintergrundfarbe auf die Zelle basierend auf dem ausgewählten Element:

  1. Wählen Sie eine Zelle in der Tabelle aus, in die Sie die Dropdown-Liste einfügen möchten, und klicken Sie dann auf „Entwicklertools“ > „Dropdown-Listen-Inhaltssteuerelement“.

    Hinweis: Wenn Sie die Registerkarte „Entwicklertools“ in der Symbolleiste nicht sehen, besuchen Sie: Wie zeigt man die Entwicklertools-Registerkarte im Word-Menüband an.

    Drop-Down List Content Control button on the ribbon
  2. Die Dropdown-Liste wird in die spezifische Zelle eingefügt. Klicken Sie dann auf „Entwicklertools“ > „Eigenschaften“.
    3. Drop-down inserted into a specific cell with Properties option highlighted
  3. Führen Sie im Dialogfeld „Eigenschaften des Inhaltssteuerelements“ Folgendes aus:
    1. Geben Sie den Titelnamen im Textfeld „Titel“ ein.
    2. Klicken Sie auf die Schaltfläche „Hinzufügen“, um das Dialogfeld „Auswahl hinzufügen“ zu öffnen.
    3. Geben Sie das Dropdown-Listenelement im Textfeld „Anzeigename“ ein.
      Content Control Properties dialog box and Add Choice dialog box
  4. Wiederholen Sie Schritt 3, um bei Bedarf weitere Dropdown-Listenelemente einzufügen.
  5. Nachdem Sie die erste Dropdown-Liste erstellt haben, können Sie sie in andere Zellen kopieren und einfügen.
    Drop-down list copied to other cells
  6. Halten Sie ALT + F11 gedrückt, um das Fenster „Microsoft Visual Basic for Applications“ zu öffnen.
  7. Doppelklicken Sie im Fenster „Microsoft Visual Basic for Applications“ auf „ThisDocument“ im Bereich „Projekt“, um das Modul zu öffnen. Kopieren und fügen Sie dann den folgenden Code in das leere Modul ein: 
    Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
With ContentControl.Range
    If ContentControl.Title = "Status" Then
        Select Case .Text
            Case "Complete"
                .Cells(1).Shading.BackgroundPatternColor = wdColorRed
            Case "In Progress"
                .Cells(1).Shading.BackgroundPatternColor = wdColorGreen
            Case "Not Start"
                .Cells(1).Shading.BackgroundPatternColor = wdColorBlue
            Case Else
                .Cells(1).Shading.BackgroundPatternColor = wdColorAutomatic
        End Select
    End If
End With
End Sub

    Hinweis: Im obigen Code ist „Status“ der Titelname, der beim Erstellen der Dropdown-Liste verwendet wurde, und „Abgeschlossen“, „In Bearbeitung“ und „Nicht gestartet“ sind die Elemente. Sie können diese Werte und die entsprechenden Farben bei Bedarf ändern.

    VBA window with ThisDocument selected, showing code pasted into the blank module
  8. Speichern und schließen Sie das Codefenster. Jetzt wird beim Auswählen eines Elements aus der Dropdown-Liste die entsprechende Farbe die Zelle füllen.
    Demo showing a cell's color changing when an item is selected from the drop-down list

Die besten Produktivitätstools für das Büro

Kutools for Word – Erweitern Sie Ihr Word-Erlebnis mit mehr als 100 bemerkenswerten Funktionen!

🤖 Kutools AI Features: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI Korrekturlesen ...

📘 Dokument beherrschen: Seiten aufteilen / Dokumente zusammenführen / Bereich in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML ...) / Stapelweise Konvertierung zu PDF ...

✏ Text bearbeiten: Stapelweise Suchen und Ersetzen in mehreren Dateien / Alle Bilder skalieren / Tabelle transponieren (Zeilen und Spalten) / Tabelle in Text umwandeln ...

🧹 Mühelos reinigen: Zusätzliche Leerzeichen entfernen / Abschnittsumbrüche / Textfeld / Verknüpfungen / Weitere Entfernen-Werkzeuge finden Sie in der Gruppe Entfernen ...

➕ Kreative Einfügen: Tausendertrennzeichen einfügen / Kontrollkästchen / Optionsfeld / QR-Code / Barcode / Mehrere Bilder / Entdecken Sie weitere Funktionen in der Gruppe Einfügen ...

🔍 Präzise Auswahl: Einzelne Seiten, Referenztabellen, Form, Überschriftenabsatz gezielt festlegen / Navigation mit weiteren Auswählen -Features verbessern ...

⭐ Besondere Erweiterungen: Zu jedem Bereich navigieren / Automatisches Einfügen von wiederkehrendem Text / Zwischen Dokument-Fenster umschalten /11 Konvertierungs-Werkzeuge ...

🌍 Unterstützt über40 Sprachen: Nutzen Sie Kutools in Ihrer bevorzugten Sprache – Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Möchten Sie diese Funktionen ausprobieren? Jetzt Kutools for Word herunterladen! 🚀
 

✨ Kutools for Office – Eine Installation, fünf leistungsstarke Tools!

Enthält Office Tab Pro · Kutools für Excel · Kutools für Outlook · Kutools for Word · Kutools for PowerPoint

📦 Alle5 Tools in einer Suite erhalten | 🔗 Nahtlose Integration in Microsoft Office | ⚡ Sofort Zeit sparen und Produktivität steigern

Die besten Produktivitätstools für das Büro

Kutools for Word – 100+ Tools für Word

Kostenloser Download Jetzt kaufen Mehr erfahren über Kutools