Format active cell

[staticbob]

Hi,

How would I format the active cell when it is selected, and the one to its right the same. Then copy the data in the 2nd cell to another.

eg, click on cell A1, both A1 AND A2 are highlighted red, AND the value in A2 is copied to A3

Cheers !
Bob

 

[SIXTH SENSE]

And this goes to the standard module!


<font face=Courier New><SPAN style="color:#00007F">Type</SPAN> CellX
    Target <SPAN style="color:#00007F">As</SPAN> Range
    ColorIndex <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Integer</SPAN>
    Rng <SPAN style="color:#00007F">As</SPAN> Range
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Type</SPAN></FONT>