Richard's method works fine if you have no other colored cells in your workbook.
If you need to preserve cell colors, you can use a Named Range and the following code.
First, make a named range called "ActiveCell". You can name any cell, it doesn't matter which. The code below will change the reference whenever you select another cell.
Then put this into your workbook module.
Then create a conditional formatting rule that applies to all cells ("=$1:$1048576") with the formula "=CELL("address",A1)=ActiveCell"
Then you need to apply the same conditional formatting rule to all worksheets. Or just change the code above to only be on the selectionchange event of your desired sheet.
Also, this doesn't work on whichever workbook you have open. I'd need to think about that a bit to make it work on all workbooks without any modification to those workbooks.
Bookmarks