J
Joel
I think the problem is very simple. I didn't notice the H's and I's. change
the following in 2 places
from
Do While (Not IsEmpty(.Cells(RowCount, "I")) And _
(.Cells(RowCount, "H") <> Model)) Or _
(.Rows(RowCount).Hidden = True)
to
Do While (Not IsEmpty(.Cells(RowCount, "H")) And _
(.Cells(RowCount, "H") <> Model)) Or _
(.Rows(RowCount).Hidden = True)
the following in 2 places
from
Do While (Not IsEmpty(.Cells(RowCount, "I")) And _
(.Cells(RowCount, "H") <> Model)) Or _
(.Rows(RowCount).Hidden = True)
to
Do While (Not IsEmpty(.Cells(RowCount, "H")) And _
(.Cells(RowCount, "H") <> Model)) Or _
(.Rows(RowCount).Hidden = True)