Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
384to388
384to388
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Leere Zeilen verstecken

Forumthread: Leere Zeilen verstecken

Leere Zeilen verstecken
18.02.2004 11:08:59
Christinchen
Guten Morgen!
Ich würde gerne alle Zeilen verstecken, die leer sind... wenn eine Zelle in der Zeile leer ist, dann ist immer die ganze Zeile leer. Also habe ich folgendes geschrieben:
Workbooks("fehl.xls").Worksheets("Sheet1").Activate
For i = 6 To 47
If Workbooks("fehl.xls").Worksheets("Sheet1").Cells(i, 1) = "" Then
Rows("i:i").Select
Selection.EntireRow.Hidden = True
End If
Next i
Allerdings funktioniert das nicht, weil er Rows("i:i") nicht nimmt.
Weiß jemand, wie ich das lösen kann, ohne jede Zeile einzeln zu testen?
MfG Christinchen
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Leere Zeilen verstecken
18.02.2004 11:12:51
AndreasS
Morgen,
müßte so gehen:
Rows(i).EntireRow.Hidden = True
Gruß Andreas
AW: Leere Zeilen verstecken
18.02.2004 11:13:18
Galenzo
Hallo Christinchen,
die "magische" Zeile:

Private Sub Ausblenden()
Range("A6:A47").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End Sub

Das reicht aus.
mfg
Anzeige
AW: Leere Zeilen verstecken
18.02.2004 11:17:46
Christinchen
Danke Galenzo!
Hat supi geklappt! Wie Zauberei! *grins*
Bis denne Christinchen
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum