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

Zeilen ausblenden

Forumthread: Zeilen ausblenden

Zeilen ausblenden
02.04.2006 10:34:53
Dieterlem
Hallo Excelfreunde,
ich möchte die letzte beschriebene Zelle in der Spalte B finden und alle darunterliegenden Zeilen ausblenden.
Die letzte Zeile finde ich mit:
ActiveSheet.Cells(65536, 2).End(xlUp).Row
Wie blende ich nun den Rest aus (ohne Schleife)?
Gruß
Dieterlem
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ausblenden
02.04.2006 10:41:32
Nepumuk
Hallo Dieterlem,
ein klassischer Dreizeiler:
Public Sub test()
    Range(Cells(Rows.Count, 2).End(xlUp).Offset(1, 0), Cells(Rows.Count, 2)).EntireRow.Hidden = True
End Sub

Gruß
Nepumuk
Anzeige
AW: Zeilen ausblenden
ransi
Hallo
versuchs mal so:
Rows(Range("B65536").End(xlUp).Row + 1 & ":65536").Hidden = True
ransi
Danke funktioniert o.T.
02.04.2006 10:55:37
Dieterlem
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige