Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zeilen ausblenden, falls bestimmter Text in Zelle

Zeilen ausblenden, falls bestimmter Text in Zelle
03.04.2018 15:44:22
Fabian
Hallo zusammen,
erst einmal vorne weg, meine VBA Kenntnisse sind wie schon angegeben "bescheiden". Ich benötige jedoch einen VBA Code für ein Excel Sheet der folgendes kann:
- Wenn in Zelle "AD23" das Wort "Nein" steht, dann sollen die kompletten Zeilen 24 bis 28 ausgeblendet werden
- Sobald ich dort "Ja" eintrage, sollen die Zeilen eingeblendet bleiben
Ich hoffe ich war präzise genug, falls nicht, gerne fragen.
Ebenfalls hoffe ich auf schnelle Hilfe. Danke im Voraus!
Beste Grüße,
Fabian
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Wie wird AD23 verändert? Formel oder Eingabe?
03.04.2018 15:47:31
EtoPHG

AW: Wie wird AD23 verändert? Formel oder Eingabe?
03.04.2018 15:49:08
Fabian
Die Zelle ist einen Dropdownliste mit den Möglichkeiten "Ja; Nein"
Danke für die schnelle Antwort!
AW: Zeilen ausblenden, falls bestimmter Text in Zelle
03.04.2018 15:56:27
EtoPHG
Hallo Fabian,
Diesen Code in das Tabellenblatt:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$AD$23" Then
Range("24:28").Rows.Hidden = (Target = "Nein")
End If
End Sub
Gruess Hansueli
Anzeige
AW: Zeilen ausblenden, falls bestimmter Text in Zelle
03.04.2018 16:01:09
Fabian
DANKE! Genaus das, was ich gesucht habe!
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Zeilen ausblenden in Excel bei bestimmtem Text


Schritt-für-Schritt-Anleitung

Um in Excel eine Zeile auszublenden, wenn ein bestimmter Text in einer Zelle steht, kannst du VBA nutzen. Hier ist eine einfache Anleitung:

  1. Öffne dein Excel-Dokument und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Suche in der linken Seitenleiste das entsprechende Tabellenblatt, in dem du die Änderungen vornehmen möchtest.

  3. Doppelklicke auf das Blatt, um das Codefenster zu öffnen.

  4. Füge den folgenden Code in das Codefenster ein:

    Private Sub Worksheet_Change(ByVal Target As Range)
       If Target.Address = "$AD$23" Then
           Range("24:28").Rows.Hidden = (Target = "Nein")
       End If
    End Sub
  5. Schließe den VBA-Editor und kehre zu deinem Arbeitsblatt zurück.

  6. Erstelle eine Dropdown-Liste in Zelle AD23 mit den Werten "Ja" und "Nein".

  7. Teste die Funktion, indem du "Nein" oder "Ja" in die Zelle eingibst.


Häufige Fehler und Lösungen

  • Fehler: Die Zeilen werden nicht ausgeblendet.

    • Lösung: Überprüfe, ob die Dropdown-Liste korrekt eingerichtet ist und die Zelle AD23 tatsächlich zur Bedingung gehört.
  • Fehler: Der VBA-Code wird nicht aktiviert.

    • Lösung: Stelle sicher, dass die Makros in deiner Excel-Version aktiviert sind.

Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du auch die Filterfunktion nutzen:

  1. Markiere die Daten, die du filtern möchtest.
  2. Gehe zu Daten > Filter.
  3. Klicke auf den Dropdown-Pfeil in der Spaltenüberschrift und wähle nur die Werte aus, die du anzeigen möchtest.

Diese Methode ist jedoch weniger dynamisch und erfordert manuelle Anpassungen.


Praktische Beispiele

Ein praktisches Beispiel könnte sein, dass du in einer Tabelle die Zeilen mit bestimmten Inhalten ausblenden möchtest. Wenn du beispielsweise eine Liste von Projekten hast und nur die abgelehnten Projekte ausblenden möchtest, kannst du den gleichen VBA-Ansatz verwenden.

If Target.Address = "$B$1" Then
    Rows("2:10").Hidden = (Target = "Abgelehnt")
End If

Hier wird die Zeile ausgeblendet, wenn in Zelle B1 "Abgelehnt" steht.


Tipps für Profis

  • Nutze den Worksheet_Change-Ereignis, um mehrere Bedingungen in einem einzigen Codeblock zu verwalten.
  • Experimentiere mit unterschiedlichen Bedingungen, um flexiblere Ausblendungen zu erreichen, z.B. If Target.Value = "x" Then ....
  • Achte darauf, die Schrift in ausgeblendeten Zeilen so zu formatieren, dass sie nicht mehr sichtbar ist, um die Übersichtlichkeit zu verbessern.

FAQ: Häufige Fragen

1. Frage
Wie kann ich mehrere Zellen gleichzeitig überwachen?
Antwort: Du kannst die Bedingung erweitern, indem du ein Array von Zellen überprüfst oder mehrere If-Bedingungen in deinem Code nutzt.

2. Frage
Kann ich auch ganze Spalten ausblenden?
Antwort: Ja, du kannst Columns("A:A").Hidden = True verwenden, um die gesamte Spalte A auszublenden, je nach Bedingung.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige