Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
836to840
836to840
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
11.01.2007 15:50:57
Thomas
Hallo zusammen,
ich habe in meinem Tabellenblatt tabelle 1, einen Button mit dem Namen Berechen.
Dieser Button soll in Spalte W ab Zeile 3, bis zum Ende der Spalte W wo ein Inhalt steht, prüfen ob eine Zelle den Zelleninhalt "Demo" besitzt.
Besitzt eine Zelle den Zelleninhalt "Demo", soll die Zeile ausgeblendet werden.
Für Hilfe bedanke ich mich jetzt schon!
Thomas
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ausblenden
11.01.2007 16:58:18
Rudi
Hallo,
kurz und bündig:

Private Sub Berechen_Click()
Dim rng As Range
Application.ScreenUpdating = False
For Each rng In Range(Cells(3, 23), Cells(Rows.Count, 23).End(xlUp))
rng.EntireRow.Hidden = rng.Value = "Demo"
Next rng
Application.ScreenUpdating = True
End Sub

GrußRudi
heißt der Button nicht Berechnen?
Eine Kuh macht Muh, viele Kühe machen Mühe
Anzeige
AW: Zeilen ausblenden
11.01.2007 22:40:31
Thomas
Hallo Rudi,
vielen Dank für die Hilfe!!!
Gruß,
Thomas
;

Beliebteste Forumthreads (12 Monate)

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