Bestimmte Zeilen ausblenden wenn bestimmter Wert

Forumthread: Bestimmte Zeilen ausblenden wenn bestimmter Wert

28.11.2014 21:54:10

Fischmobpower

Hallo zusammen,
ich habe folgendes Problem und bin bisher bei Google erfolglos auf der Suche nach einer Lösung:
Ich habe in Excel eine Dropdown-Liste erstellt. Hier gibt es 5 Auswahlmöglichkeiten. In der Zelle F9 befindet sich meine Zellverknüpfung des Dropdown Steuerelements, wo, je nach Auswahl, 1-5 eingetragen wird.
Nun möchte ich gerne, dass, je nach Auswahl 1-5, bestimmte Zeilen in der Excel-Tabelle angezeigt werden, z.B.
Bei Auswahl Dropdown 1 sollen die Zeilen B19:B25 angezeigt werden
Bei Auswahl Dropdown 2 sollen die Zeilen B26:B33 angezeigt werden
Bei Auswahl Dropdown 3 sollen die Zeilen B34:B43 angezeigt werden
Bei Auswahl Dropdown 4 sollen die Zeilen B44:B54 angezeigt werden und
Bei Auswahl Dropdown 5 sollen die Zeilen B55:B63 angezeigt werden.
Entsprechend sollen logischerweise die übrigen Zeilen, welche nicht ausgewählt wurden, ausgeblendet werden. Ich habe es nicht geschafft, einen entsprechenden VBA-Code zu erstellen. Vielleicht könnt ihr mir helfen!!!
Vielen Dank für Eure Hilfe!!!!
PS: Wäre super, wenn sich bei Änderung der Dropdown-Auswahl auch sofort die anzuzeigenden Zeilen aktualisieren!

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

Select Case Range("F9").Value ...

28.11.2014 23:20:04

Matthias

Select Case Range("F9").Value ...

28.11.2014 23:20:04

Matthias

Hallo

Option Explicit
Sub Dropdown2_BeiÄnderung()
Application.ScreenUpdating = False
Rows("19:63").EntireRow.Hidden = True
Select Case Range("F9").Value
Case Is = 1
Rows("19:25").EntireRow.Hidden = False
Case Is = 2
Rows("26:33").EntireRow.Hidden = False
Case Is = 3
Rows("34:43").EntireRow.Hidden = False
Case Is = 4
Rows("44:54").EntireRow.Hidden = False
Case Is = 5
Rows("55:63").EntireRow.Hidden = False
End Select
End Sub

https://www.herber.de/bbs/user/94101.xlsm
Gruß Matthias

Infobox / Tutorial

Zeilen in Excel automatisch ausblenden basierend auf Dropdown-Auswahl

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Dropdown-Liste erstellen:
- Wähle die Zelle F9 aus und gehe zu Daten > Datenüberprüfung.
- Setze den Typ auf Liste und füge die Werte (1, 2, 3, 4, 5) hinzu.
VBA-Editor öffnen:
- Drücke ALT + F11, um den VBA-Editor zu öffnen.
Modul erstellen:
- Klicke mit der rechten Maustaste auf VBAProject (DeineDatei.xlsx) und wähle Einfügen > Modul.

VBA-Code einfügen:

Kopiere den folgenden Code in das Modul:

Option Explicit
Sub Dropdown2_BeiÄnderung()
   Application.ScreenUpdating = False
   Rows("19:63").EntireRow.Hidden = True
   Select Case Range("F9").Value
       Case Is = 1
           Rows("19:25").EntireRow.Hidden = False
       Case Is = 2
           Rows("26:33").EntireRow.Hidden = False
       Case Is = 3
           Rows("34:43").EntireRow.Hidden = False
       Case Is = 4
           Rows("44:54").EntireRow.Hidden = False
       Case Is = 5
           Rows("55:63").EntireRow.Hidden = False
   End Select
   Application.ScreenUpdating = True
End Sub

Ereignis hinzufügen:

Klicke auf das Blatt mit der Dropdown-Liste und wähle im VBA-Editor das Dropdown „Worksheet“ aus.
Füge folgendes Ereignis hinzu:

Private Sub Worksheet_Change(ByVal Target As Range)
   If Not Intersect(Target, Range("F9")) Is Nothing Then
       Call Dropdown2_BeiÄnderung
   End If
End Sub

Makros aktivieren:
- Schließe den VBA-Editor und speichere die Datei als Excel-Makro-fähige Arbeitsmappe (*.xlsm).

Häufige Fehler und Lösungen

Fehler: „#WERT!“ wird angezeigt:
- Überprüfe, ob die Zelle F9 tatsächlich einen Wert aus der Dropdown-Liste hat. Wenn nicht, wird der Fehler angezeigt.
Zeilen werden nicht ausgeblendet:
- Stelle sicher, dass das Makro aktiviert ist und dass die Dropdown-Liste korrekt funktioniert.
Makros werden nicht ausgeführt:
- Überprüfe die Sicherheitseinstellungen für Makros unter Datei > Optionen > Trust Center.

Alternative Methoden

Bedingte Formatierung: Anstatt Zeilen auszublenden, kannst du die Formatierung ändern, um die Sichtbarkeit der Daten zu verbessern.
Google Tabellen: Nutze die Funktion FILTER, um dynamisch Zeilen anzuzeigen oder auszublenden, basierend auf einer Bedingung.

=FILTER(A19:A63, B19:B63=F9)

Praktische Beispiele

Beispiel 1: Wenn du ein Projektmanagement-Tool in Excel hast, kannst du die Zeilen für abgeschlossene Projekte ausblenden, um den Fokus auf aktuelle Aufgaben zu legen.
Beispiel 2: Bei einer Verkaufsanalyse kannst du die Zeilen für bestimmte Produkte ausblenden, wenn diese nicht mehr verfügbar sind.

Tipps für Profis

Nutze die Tastenkombination ALT + F8, um deine Makros schnell auszuführen.
Experimentiere mit Bedingter Formatierung, um die Sichtbarkeit von Zeilen zu verbessern, anstatt sie auszublenden.
Halte deine VBA-Codes modular, um die Wartbarkeit zu erhöhen.

FAQ: Häufige Fragen

1. Gibt es eine Möglichkeit, die Zeilen ohne VBA auszublenden? Es ist schwierig, Zeilen ohne VBA in Excel auszublenden. Eine Alternative wäre die Verwendung von Filtern.

2. Kann ich die gleiche Technik in Google Tabellen verwenden? Ja, in Google Tabellen kannst du die Funktion FILTER verwenden, um ähnliche Ergebnisse zu erzielen.

3. Was passiert, wenn ich die Dropdown-Liste ändere? Sobald du die Auswahl änderst, wird das Makro automatisch ausgeführt und die entsprechenden Zeilen werden aktualisiert.

Beliebteste Forumthreads (12 Monate)

Bestimmte Zeilen ausblenden wenn bestimmter Wert

Forumthread: Bestimmte Zeilen ausblenden wenn bestimmter Wert

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Zeilen in Excel automatisch ausblenden basierend auf Dropdown-Auswahl

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread