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

Zeilen ausblenden

Zeilen ausblenden
25.04.2008 14:38:00
Gisela
Hallo,
in der Spalte E befinden sich (E8:E500) Datumseingaben.
Ich möchte alle Zeilen ausblenden, bei denen das eingetragene Datum kleiner "Heute " ist.
Kann mir da bitte jemand helfen.
Vielen Dank und Grüße
Gisela

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ausblenden
25.04.2008 14:43:00
Rudi
Hallo,

Sub tt()
Dim rng As Range
Application.ScreenUpdating = False
For Each rng In Range("E3:E500").Cells
rng.EntireRow.Hidden = rng 


Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

hoffentlich gehen deine Zeilen...
25.04.2008 15:03:00
Renee
nie über 32768 raus, Schnee
(sowas 'wie Bytes sparen' macht man und frau nicht [mehr]!)
GreetZ Renée ;-)

Anzeige
AW: hoffentlich gehen deine Zeilen...
25.04.2008 15:23:00
Schnee
Oups, das war mir bis jetzt noch gar nicht aufgefallen. *schäm*
Integer reicht ja nur bis 32767.
Gisela, da müsstest du also "lastrow" doch besser als Long dimensionieren, damit du ab der 32768ten Zeile nich in Schwierigkeiten kommst.
Danke für den Tip Renée.
Beste Grüße,
Schnee

AW:vielen Dank an alle, o.T.
25.04.2008 16:45:00
Gisela
o.T.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige