View Single Post
 
Old 06-17-2018, 09:58 PM
Logit Logit is offline Windows 10 Office 2007
Expert
 
Join Date: Jan 2017
Posts: 587
Logit is a jewel in the roughLogit is a jewel in the roughLogit is a jewel in the roughLogit is a jewel in the rough
Default

.
I know you said FILTER ... but here is a macro that will do the same as requested. Your
variable STARTDATE can refer to a specific cell ?

Code:
Option Explicit

Sub HideRowsContainingValue()
'Description: This macro will loop through a col and
'hide the row if the cell in Col A does not the value of A1.
    
Dim c As Range
Application.ScreenUpdating = False
    For Each c In Range("A2:A100").Cells
        If c.Value < Range("A1").Value Then
            c.EntireRow.Hidden = True
        End If
    Next c
Application.ScreenUpdating = True

End Sub

Sub UnhideAllColumns()
'This macro will unhide all the columns in the
'specified range.
Application.ScreenUpdating = False

    Range("A1:A100").EntireRow.Hidden = False

Application.ScreenUpdating = True
End Sub
Attached Files
File Type: xlsm Hide Rows.xlsm (17.8 KB, 12 views)
Reply With Quote