Hi sparx,
Edit: After re-reading your question I noticed that you have your error message before my below assumption. It looks that the error you're getting is due to hidden cells where the Range.Find will not work unless you either unhide the cells, perform your code then re-hide or change your LookIn argument to xlFormula if your data is not formulas in the range
I have revised your code a little bit. I think the issue could be due to not assigning the Rows("4:33") as highlighted in red below to any sheet takes the active sheet. Try the below code & if you hit the same error message, try to assign the rows to a sheet
Bookmarks