You could just use existing excel formulas and then paste special as values?

put this in cell B2, and it takes the fourth character out of A1

=LEFT(A1,3)&RIGHT(A1,LEN(A1)-4)

Sam

"Catherine" wrote:

Hi,

I would like to have a macro that would delete only the fourth character
into the selected cells

Thanks
Catherine