How does your worksheet works:
1) In columns E you will have always "USD" or you are goint to have values?
2) In columns H you will have always "GBP" or you are goint to have values?
3) If you have a value in column F you will always have a value in column I, correct?
if all the answres to my questions are yes then try to copy this code to a module and run it
Sub hideRows()
Dim rng As Range
Dim rCell As Range
Application.ScreenUpdating = False
Set rng = Sheets("Statement").Range("I25:I103") ' you can define a named range
For Each rCell In rng
rCell.Select
If Not IsEmpty(rCell) And rCell = 0 Then
Rows(rCell.Row & ":" & rCell.Row).EntireRow.Hidden = True
End If
Next
Application.ScreenUpdating = True
End Sub
Bookmarks