Brian,
no, I'm stumped.
I cant work this out
For r2 = 1 To lrws2
'rescan
For r1 = 2 To lrws1
If ws1.Cells(r1, 2) = ws2.Cells(r2, 1) Then
ws1.Rows(r1).EntireRow.Hidden = False
Exit For
End If
Next r1
Next r2
I thought:
r2 was column 2 on sheet 1
r1 was column1 on sheet 2...