Susan:

Thanks for the quick response...I have this but it just keeps looping
now...from L7:L19 I have the abbreviations to each state in the 10 state
range....

Do I have to put this code in for all 10 per cell?

I appreciate the help...what is AFAIK?

"Susan" wrote:

try

Dim R As Range
For Each R In Range("E:E")
If R.Value = range("L" & r.row) Then Rows(R.Row).Hidden = True
Next
End Sub

you can't just specify (AFAIK) the whole range of L:L, you have to
tell it specifically which cell to compare it to.
if i understood you correctly.
:)
susan


On Nov 19, 11:21 pm, Getting Fired
wrote:
Here is the example:
Kelly John Tulsa & Stillwater OK

I have a range of 10 states, 20 states, another 20 states for 3 different
people.

If state matches in the range of the 10 states, then all other rows are
hidden..thought it was as basic as,
Dim R As Range
For Each R In Range("E:E")
If R.Value = ("L:L") Then Rows(R.Row).Hidden = True
Next
End Sub

or

Dim cell As Range
'For Each cell In Range("L:L")
'If UCase(cell.Value) = "IA" Then
'cell.EntireRow.Hidden = True
'End If
'Next

I'm out of ideas.

Thanks in advance