Modify to suit
Sub replacex()
Range("h9,h11,h13,h15").Replace "x", ""
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Corey" wrote in message ...
I am trying to create a simple code to place/remove a 'X' in a various cells across a sheet IF the cell is clicked.
There are about 20 individual cells:
A12,A14,A16,A18.A20,A22,A24,E12,E14,E16,E18,E20,E2 2,E24,
K12,K14,K16,K18,K20,K22,K24,Q,12,Q14,Q16, Q20,Q22,Q24.

If the user selects one of the cells, then a 'X' appears.
If the cell already had a 'X' in it, then the cell clears.

How can i accomplish this ?


--
Corey ....
The Silliest Question is generally
the one i forgot to ask.