VBA: enkel de rijen boven 1000 eur laten staan

[Marky76]

Beste,

Met welke VBA code kan je in bijgevoegd excelbestandje ervoor zorgen dat hij enkel de rijen laat zien die boven de 1000 eur liggen. En een code om ze daarna allemaal terug weer te geven. Kan dit?

Groeten,
Mark

 

[Jeroen123456]

Zie bestand

 

[tilpi]

Sub verbergrijen()
    Dim rij As Long
    For rij = Range("D65536").End(xlUp).Row To 2 Step -1
        If Cells(rij, 4).Value < 1000 Then Rows(rij).EntireRow.Hidden = True
    Next
End Sub

Sub toonrijen()
     Range("D65536").End(xlUp).CurrentRegion.EntireRow.Hidden = False
    
End Sub

Mvg

Piet

 

[Ginger]

Ehhhh... VBA-code??? Waarom? Wat is er mis met het oude vertrouwde filter?

Groet, Leo

 

[Marky76]

Beste,

Magnific, werkt schitterend.

Bedankt,
Mark