Run-time error '1004': Method 'Range' of object 'Global' failed

I am using the following macro code in a spreadsheet to hide rows and it works. However, when I copied it to another spreadsheet I am getting the above error message. The Macro should hide all rows with a 1 in the cell in column AJ. I am very inexperienced with Macros so any help would be fantastic.

Please Login or Register  to view this content.

Thanks

Welcome to the forum.

Please take a few minutes to read the forum rules, and then edit your post to add CODE tags.

While you're doing that, please add a clear explanation of exactly what the code is supposed to do.

Thanks.