Hi,

Am 24 Jun 2014 13:33:58 GMT schrieb Isis:

I want to show data rows based on 2 conditions using OR not AND.

I want to show a row if it has a value in Field 14

OR

If it has no value in Field 12 AND a value in Field 16

try:

Sub HideRows()
Dim LRow As Long
Dim rngC As Range

With ActiveSheet
LRow = .Cells(Rows.Count, 1).End(xlUp).Row
For Each rngC In .Range("P2:P" & LRow)
If Len(rngC) = 0 And Len(rngC.Offset(, -4)) 0 _
Or Len(rngC.Offset(, -2)) = 0 Then
.Rows(rngC.Row).Hidden = True
End If
Next
End With
End Sub


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional