VBA Conditional Formatting by first three letters in range

I have used the following code to format the cells in my spreadsheet. I copied this from a website so I don't actually know what it means! It's working fine but I would like to be able to format by the first three letters in each cell, not just the first letter. I am a complete novice and any help would be hugely appreciated.

Thanks in advance

Please Login or Register  to view this content.

It works beautifully. Thank you so much for your help.

x