Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1860to1864
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
Inhaltsverzeichnis

Zeilen mit Eintrag iausblenden

Zeilen mit Eintrag iausblenden
05.01.2022 15:36:03
Wolfango
Hallo Experten,
folgender Wunsch:
Beim Öffnen der Datei sollen alle Zeilen ausgeblendet werden, bei denen in Spalte C etwas eingetragen wurde. Und zwar in sämtlichen Arbeitsblättern der Datei.
Schomma Danke fürs Nachdenken!
Wo

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen mit Eintrag iausblenden
05.01.2022 15:54:03
Pierre
Hallo Wolfgang,
ganz easy wäre:

Private Sub Workbook_Open()
Dim i As Long
For i = 2 To ActiveSheet.Cells(Rows.Count, 3).End(xlUp).Row
If Cells(i, 3).Value  "" Then
Rows(i).EntireRow.Hidden = True
End If
Next i
End Sub
Vermutlich wäre eine Array-Lösung schneller, bei sehr sehr vielen Datensätzen, sprich bei sehr sehr vielen auszublendenden Zeilen.
Gruß Pierre
quick'n'dity
05.01.2022 15:55:07
Rudi
Hallo,

Private Sub Workbook_Open()
Dim wks As Worksheet
For Each wks In Worksheets
On Error Resume Next
wks.Columns(3).SpecialCells(xlCellTypeConstants).EntireRow.Hidden = True
Next
End Sub
Gruß
Rudi
Anzeige
ohje...
05.01.2022 15:56:58
Pierre
Hab tatsächlich vergessen, dass es ja über alle Blätter laufen sollte...
r
05.01.2022 15:57:03
Rudi
;-)

277 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige