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

Zeile markieren

Forumthread: 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é
Anzeige

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)

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