Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1788to1792
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

Zeile markieren

Zeile markieren
24.10.2020 05:31:21
Lieske
Hallo Profis,
habe im Archiv ein Macro gefunden das wenn in Spalte D das Wort "RICHTIG"
vorkommt die Zeile ausbenden soll.
Leider funktioniert das Macro bei mir nicht.
Was mache ich falsch?
https://www.herber.de/bbs/user/141051.xlsm
Gruss André

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

Betreff
Datum
Anwender
Anzeige
AW: Zeile markieren
24.10.2020 07:14:03
Nepumuk
Hallo André,
teste mal:
Option Explicit

Public Sub Zeilen_ausblenden()
    
    Const SEARCH_COLUMN As Long = 4
    Const START_ROW As Long = 2
    
    Dim objCell As Range
    
    For Each objCell In Range(Cells(START_ROW, SEARCH_COLUMN), Cells(Rows.Count, SEARCH_COLUMN).End(xlUp))
        
        objCell.EntireRow.Hidden = Not objCell.Value
        
    Next
End Sub

Public Sub Zeilen_einblenden()
    Rows.Hidden = False
End Sub

Gruß
Nepumuk
Anzeige
AW: Zeile markieren
24.10.2020 09:35:16
Hajo_Zi
Hallo André,
warum nicht ohne VBA? Autofilter.

AW: Zeile markieren
24.10.2020 12:49:06
Herbert_Grom
Hallo,
vielleicht, weil in deinem Sheet das Wort "RICHTIG" gar nicht vorkommt?
Servus

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige