Colouring Strikethrough/Underline text within a cell via Loop

Hi Everyone,

With the help of members on the ExcelForum, I have managed to come up with a code which:

Finds the last column in the worksheet, then colours every strikethrough text blue, and every underlined text in red in each cell, from the identified first row of the last column, up until the last row of the last column. Below is my working code.

I'm just wondering if there is anyway to optimise the colouring process? It roughly takes 3minutes to process 700 lines within the worksheet, within the identified column range.

Thank you in advance

Please Login or Register  to view this content.

thank you very much for your ongoing help spitfireblue, you seem to know alot about excel vba! haha

Yes, I just ran the code on 700 lines and it approx takes 4 minutes. Trying to find a way to make it go faster, maybe less than 30 seconds.

A friend said he has seen it done, but doesn't know how to code it. :/

Is there any other way I can approach this? Maybe optimising the loop or something?

Yes I have turned it off but still can't get it to work faster.

I was just thinking, maybe if we skip unused cells too? Could speed up the process...

thank you for your code humdingaling. just ran a test and that code takes 4 minutes