Macro for conditionally hidden rows

[adamo89]

Hi, I'd like to create a Macro in Excel 2007 that will hide each row that has a certain entry in a certain column, and keep all other rows visible, whether the rows started out hidden or not. Can you help? Thanks!

 

[taigovinda]

Welcome to the board!

Which column would you like to evaluate, and what values should cause rows to be hidden?

 

[adamo89]

I'd like to evaluate column F, and want to hide the row if the value is "Done"

 

[taigovinda]

Hi, give this a try:

Option Explicit
Sub HideDone()
Dim rngCel As Range
Application.ScreenUpdating = False
Cells.EntireRow.Hidden = False
For Each rngCel In Range(Cells(1, "F"), Cells(Rows.Count, "F").End(xlUp))
    If rngCel.Value = "Done" Then rngCel.EntireRow.Hidden = True
Next
Application.ScreenUpdating = True
End Sub