How do Macro to EDIT cells?

[George]

Am using MS Excel XP (2002). All I want to do is a short macro to, in
effect, press F2 (to EDIT the cell), then let's say delete the first
character of the cell and change it to let's say X, like this...


Before:
_Mary Jones
*Joe Smith
%Peter Rabbbit

After:
XMary Jones
XJoe Smith
XPeter Rabbbit

I just want to put the cursor on a given cell, click CNTL-A to run the
macro, and have it change one cell at a time. There are reasons why I can't
use the search and replace. Problem is... if I record the macro (turn it
on, press the key sequences, F2, Home, Delete, X, GoDownOneCell, turn it
off), it puts XMary Jones in all the cells, like this (I think it isn't
interpretting the F2 key correctly)...

After:
XMary Jones
XMary Jones
XMary Jones

Would appreciate any suggestions, thanks, George.

 

[Earl Kiosterud]

George,

Sub ChangeX()
ActiveCell = "X" & Mid(ActiveCell,2,999)

End Sub

To assign a shortcut key, use Tools - Macro - Macros, select the macro,
click Options, and put in the shortcut.