Hi Michael,
For Each cell In Range("A1:A4")
cell.Value = MID(cell.Value,5,4)
Next cell
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
"Michael E." wrote in message
...
Hi,
I do have strings of characters in a column of cells. Each cell has exact
the same number of characters (11). Like this:
Cells from A1 to A4
tva/1,23/bn
bnc/2,24/vb
gzc/3,12/jb
hzf/1,56/hj
I only need the characters at position 5,6,7,8:
1,23
2,24
3,12
1,56
I would like to do the task with a vba-macro that selects cells A1-A4 and
then shows only the 4 charakters. I think the vba MID-Function Mid (string,
start, length) would be the right tool. But I donīt know how to write the
makro.
Can anyone help?
Thanks a lot
Michael