Conditional Formatting - Cross-hair Shading

Hi all,

I currently use the following piece of code (as conditional formatting) in one of my workbooks as a means to highlight where I am on the sheet (it works kinda like a cross-hair sight)...

Please Login or Register  to view this content.

The code works fine, I should add, but in its current format, it highlights the whole row and column out (left, right, above and below) from the target cell - I'm curious therefore, if the code be modified either via CF or vBa to just highlight, say, 3 cells above, below, left and right of the target cell?

Secondary to that, can the code be modified so that the target cell is a different colour to the other CF cells? IE: the target cell is black with a white font while the other cells are, say, a medium grey with a black font...

*bump* - will just push this up for one last look before I put it to bed...

Cheers,
AJ