Remove grid lines for a specified area on multiple sheets

I have this code to delete grid lines in some of the cells I need. Can anyone help me on how to automate this to delete the grid lines for all active worksheets?

Formula:

Please Login or Register  to view this content.

Please Login or Register  to view this content.

This code implements it for the sheet I am currently on but doesn't do it continuously for the other sheets in the document.

Formula:

Please Login or Register  to view this content.

Are you sure? I just doubled checked it on a new workbook and it changed all 3 sheets.

It is also giving me an error in the ' .ColorIndex = 0 ' part for some odd reason

As I said, it worked fine when I tested it, can you post your workbook with the code as you are using it in included (removing any sensitive information)?

To upload a workbook, when replying click go advanced and then go to attachments.

It's fine the code works now. I had typed it out and put 'Color' as 'Colour'. My mistake, thanks for your help