I found a way to do that, I used the Mid function to split the
alphanumeric data.. the problem is I used a For Next statement so that I could
copy the rest of the columns.. also, I have to do this every column  for every
series.. for example  column A series  is a0001 - a2000.. therefore it should stop
at a2000 then go to the next column b for the other series x0001-x2000..
Is there a way?
I've been using the If statement Then Else Stop, but the problem with Stop is
that it will stop the whole code.. and not continue to the next column..