Change Selected Cell Colour ...only whilst selected

Hi guys,

I know about as much about VBA code as an ill-educated badger so could do with a few pointers here.

I have a large table of figures that I work from (nothing out of the ordinary, just a load of numbers).
I need to find a cell and use the values in another document.

To make this easier I would like to select a cell and have the font and background colour to change so it highlights it so I don't lose where it was when I look away to my 2nd screen.

I have found and adjusted a code from else where on 'tinternet but there's a problem...

The code I found makes the font colour change to red and then goes back to black again when you move to another cell.
This is great but I wanted to make it even more obvious by also temporarily changing the font to bold and changing the background colour to something else too.

This code below does this, but it's still only the font colour that reverts back to its original state when you move to a different cell. The cell background colour and bold setting remains and doesn't revert back when you move on.
I'm guessing its something to do with the ColorIndex = xlAutomatic part? is that right?
Is there a similar setting for the bold and bg color settings?

the code in question

Please Login or Register  to view this content.

Try this... I cant remember where I found it but I have been using it for some time now

Please Login or Register  to view this content.

Well Here's a workaround that I came up with I'm sure there are better ways to accomplish this!

In ThisWorkbook

Please Login or Register  to view this content.

In a Module

Please Login or Register  to view this content.

In The Sheet

Please Login or Register  to view this content.