Seperate Cell in Data into 2 seperate cells

[buzz71023]

Hello everyone,
Need some help here.

I have data that starts in Column A2 (goes down) that consist of data, example being 102ABCYZ@1234567
I would like to separate these values where the values are split at the "@" symbol like the following in Column B and C respectively.
B would be 102ABCYZZ and column C would be 1234567.

Right now I have Column C working with the below but if there is a better way where I don't have to define 7 digits would be great as well!

=RIGHT(A2,7)

Thanks for any and all help.
BT

 

[Rick Rothstein]

T

If you have imported the values into Column A via a macro, you can use this single line of code to split them...

Columns("A").TextToColumns [A1], xlDelimited, , , False, False, False, False, True, "@"

Change the red "A" to "B" if you don't want to overwrite the original data.

 

[DanteAmor]

Youre welcome and thanks for the feedback.