Hiding Rows

[Mattprd]

I'm trying to hide rows where the cell value in column A is less than 2. Failing dismally with this so far, any ideas?


Columns(&quot;A:A&quot.CellValue(<2).EntireRow.Hidden = True

 

[dsi]

Try something like this:

Sub HideRows()
    Dim iRow As Long
    iRow = 1    'start at first row
    Do While Cells(iRow, 1) <> &quot;&quot;
        If Cells(iRow, 1) < 2 Then
            Rows(iRow & &quot;:&quot; & iRow).Hidden = True
        End If
        iRow = iRow + 1
    Loop
End Sub

 

[Mattprd]

Thats perfect, thanks for your help

 

[SkipVought]

And...

since there is more than one way to skin a cat, here's a NON-VBA solution...

1. Turn on Auto Filter

2. In the Col A dropdown, select (Custom...)

3. In the Custom Auto Filter select &quot;is less than&quot; and in the adjacent dropdown enter &quot;2&quot;

VOLA! Skip,
metzgsk@voughtaircraft.com

 

[dsi]

No wonder I haven't seen too
many cats around here.

 

[dsb]

All the icons indicate you liked the answers, so give the folks a STAR