"Run-time error '1004': App-dfnd or objt-dfnd err" Debug highlights ActiActiveCell.offset

Hello. I'm getting the "Run-time error '1004': Application-defined or object-defined error" when I run my code (see below). I'm attempting to identify the range beginning in H3 to last row in table and check each cell if = 0. If so, I want to add a thick top border to the entire row of that cell. And if, the cell = 0 and the adjacent cell equals 1 then add both a thick top and bottom border to the entire row of that cell. I tried my best to set it up but I get the above error and when I click Debug, the line that contains "ActiveCell.Offset(0, -7).Select" is highlighted. Please help. Thank you.

Please Login or Register  to view this content.

Hi GMAGANA, try this:

Please Login or Register  to view this content.

Wow, amazing! Thanks for the quick reply. Out of curiosity, what do you think was the issue with my attempt?

I try to avoid using both the Select and Active functions as much as possible to minimize the interaction between Excel and VBA. I don't know exactly how your worksheet is structured, but the error came from using activecell (e.g. instead of just cell in this example) within the for each loop.

Glad it worked