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

Forumthread: Zeilen ausblenden, wenn bestimmte Zellen leer sind

Zeilen ausblenden, wenn bestimmte Zellen leer sind
18.08.2005 14:48:15
Chris
Der Betreff klingt bestimmt ein wenig verwirrend, deshalb möchte ich zuerst mal kurz erklären warums geht. Ich hab in einer Excel-Datei zwei Tabellenblätter. Im ersten habe ich eine Materialliste wo ich immer die aktuellen Veränderungen der Bestände eintragen muss. Das ganze wird dann auf dem zweiten über Pivottabellen zusammengefasst.
Dabei gibt es verschiedene Produktgruppen, die durch die grau hinterlegten Überschriften gekennzeichnet sind. Nur kann es manchmal vorkommen das kein Produkt in einer gewissen Produktgrupppe erfasst wird. Auf dem zweiten Blatt erscheint trotzdem die Produktgruppenüberschrift bzw. die Pivottabelle. Nur würde ich das vor dem Drucken, sollte das der Fall sein, gerne ausblenden lassen.
Im 2 Tabellenblatt hab ich schon 2 aktive Makros (auf die beiden Buttons aufgeteilt) eingebaut.
Das erste ist der Button aktualisieren, mit dem werden die Einträge im 2. Tabellenblatt aktualisiert. Mit dem Button Drucken werden leere Zeilen vor dem Drucken ausgeblendet und nach dem Drucken wird eingeblendet (es wird per Makro immer die erste Spalte auf einen Inhalt geprüft, und dann eventuell ausgeblendet ... was aber später wieder zu dem Problem mit den Überschriften führt).
Ich hätte jetzt 2 Ideen wie ich das machen könnte, dass auch die Überschriften bzw. Tabellen ausgeblendet werden wenn keine Einträge vorhanden sind. Entweder 1. über eine Zusatzfunktion bzw. Befehlt in meinem Makro (beim Button "Drucken") oder 2. wenn ich das ganze zu einer ganzen Pivot-Tabelle zusammenfüge. Ich habe für jede Produktgruppe eine neue Pivottabelle erstellt, weil ich nicht weiß wie man mehrere Bereiche, die nicht direkt aneinander hängen, aber trotzdem die gleichen Feldtypen bzw. Feldinhalte haben, zu einer Pivot-Tabelle zusammenfügt.
hier ist die datei
https://www.herber.de/bbs/user/25796.xls
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ausblenden, wenn bestimmte Zellen leer sind
18.08.2005 20:12:33
Chritsoph
Hallo Chris,
mal ein anderer Ansatz - ohne Pivot
kopiere die Daten in eine neuen Tabelle und lösche dort alle Zeilen, die die Menge 0,00 haben. Wenn es anschließend Blöcke ohne Eintrag gibt, dann lösche die Zeilen der Block-Überschriften.
Das geht auch eleganter, aber ist ja nur mal ein Ansatz...
Gruß
Christoph
Option Explicit
Sub Zusammenstellen()
Dim lngLR&, i&
With Sheets("Tabelle1")
Sheets("Liste").Cells.Copy .Range("A1")
lngLR = .Cells(Rows.Count, 1).End(xlUp).Row
'Zeilen mit Menge 0 löschen:
For i = lngLR To 3 Step -1
If .Cells(i, 1).Text = 0 Then .Rows(i).Delete
Next
'Blöcke ohne Eintragung löschen:
For i = lngLR To 3 Step -1
If .Cells(i, 1) = "" And .Cells(i - 1, 1) = "Menge" Then
.Rows(i & ":" & i - 3).Delete
End If
Next
End With
End Sub

Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Zeilen in Excel ausblenden, wenn bestimmte Zellen leer sind


Schritt-für-Schritt-Anleitung

Um in Excel leere Zellen auszublenden, kannst Du ein einfaches Makro verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

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

  2. Füge ein neues Modul hinzu: Klicke im Menü auf Einfügen > Modul.

  3. Kopiere den folgenden Code in das Modul:

    Option Explicit
    Sub ZeilenAusblendenWennLeer()
       Dim lngLR As Long, i As Long
       lngLR = Cells(Rows.Count, 1).End(xlUp).Row
       For i = lngLR To 1 Step -1
           If Cells(i, 1).Value = "" Then
               Rows(i).Hidden = True
           End If
       Next i
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus: Drücke ALT + F8, wähle ZeilenAusblendenWennLeer und klicke auf Ausführen.

Dieses Makro blendet alle Zeilen aus, in denen die erste Zelle leer ist. Du kannst den Bereich anpassen, indem Du die Spaltennummer in Cells(i, 1) änderst.


Häufige Fehler und Lösungen

  • Fehler: Zeilen werden nicht ausgeblendet.

    • Lösung: Stelle sicher, dass die Zellen wirklich leer sind und keine unsichtbaren Zeichen enthalten.
  • Fehler: Makro läuft nicht.

    • Lösung: Überprüfe, ob die Makros in den Excel-Einstellungen aktiviert sind.

Alternative Methoden

Eine weitere Methode, um leere Zeilen auszublenden, ist die Verwendung von Filterfunktionen:

  1. Markiere die gesamte Tabelle.
  2. Gehe zu Daten > Filter.
  3. Klicke auf den Filterpfeil der Spalte, die Du prüfen möchtest, und deaktiviere das Häkchen für (Leere).

Diese Methode ist besonders nützlich, wenn Du keine Makros nutzen möchtest.


Praktische Beispiele

Wenn Du eine Pivot-Tabelle verwendest und leere Zeilen ausblenden möchtest, kannst Du die folgenden Schritte ausführen:

  1. Erstelle Deine Pivot-Tabelle.
  2. Klicke innerhalb der Pivot-Tabelle mit der rechten Maustaste und wähle PivotTable-Optionen.
  3. Unter dem Tab Layout & Format aktiviere die Option Leere Zeilen ausblenden.

So kannst Du sicherstellen, dass die Pivot-Tabelle leere Zeilen nicht anzeigt.


Tipps für Profis

  • Verwende bedingte Formatierung, um leere Zellen visuell hervorzuheben, bevor Du sie ausblendest.
  • Kombiniere Makros: Du kannst mehrere Makros erstellen, die nacheinander ausgeführt werden, um sowohl leere Zellen als auch die dazugehörigen Überschriften auszublenden.

FAQ: Häufige Fragen

1. Wie kann ich leere Zellen in einer Pivot-Tabelle ausblenden? Um leere Zeilen in einer Pivot-Tabelle auszublenden, gehe zu PivotTable-Optionen und aktiviere die Option Leere Zeilen ausblenden.

2. Kann ich mehrere Spalten gleichzeitig prüfen? Ja, Du kannst das Makro anpassen, um mehrere Spalten zu überprüfen, indem Du die Bedingungen in der Schleife entsprechend erweiterst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige