try to select yr data and use the macro:

Sub hideeeee()
On Error Resume Next
For Each cell In Selection
If IsNumeric(cell) And cell.Offset(0, 4) = 0 And cell.Offset(0, 5) = 0
Then
cell.Rows.EntireRow.Hidden = True
End If
Next cell

End Sub

HIH