Thanks Dave, I have actually hidden rows through using code,
Dim iRow As Long
iRow = 2
Do While Cells(iRow, 1) <> ""
If Cells(iRow, 1) <> "Other" Then
Rows(iRow & ":" & iRow).Hidden = True
End If
iRow = iRow + 1
The formula you suggested does not appear to be working. Will the formula only work if the hidden cells are filtered rather than hidden through code. If so, do you have any other suggestions.
Thanks again
Matt