Correct me if I'm wrong but...

  • Thread starter Thread starter Stephen
  • Start date Start date
S

Stephen

Shouldn't...

For i = 31 To 1000
If .Cells(i, 21).Value = "0" And .Cells(i, 22).Value = "0" Then
..Cells(i, 1).EntireRow.Hidden = True
End If
Next i

hide each row where the values for columns "U" ANd "V" equal zero?
 
For i = 31 To 1000
If .Cells(i, 21).Value = 0 And .Cells(i, 22).Value = 0 Then
.Rows(i, 1).Hidden = True
End If
Next i


--
---
HTH

Bob


(there's no email, no snail mail, but somewhere should be gmail in my addy)
 
If .Cells(i, 21).Value = "0" And .Cells(i, 22).Value = "0" Then

Unless you have columns U and V formatted as text, you would need to
remove the quote marks from the zeros. It worked OK for me once I did that.
 
Back
Top