Split Phone Number column into 2 new columns Mobile + Landline

[marko198]

I have a data file from our website which collects phone number in a single field. Unfortunately they wont change this so we have to split the numbers we get into 2 seperate columns to import into our CRM. I am hoping that there is a way to do this with a Macro/VBA. For example I have placed some random telephone numbers below to show how they would appear in the column.

Phone Number
7077888666
2012345678
1023456789
7022333444
2013245768

We have lost the first 0 of the phone number but they should all be 10 digits long in the data file. Basically we need to move any mobile number that begins with 7 in the above example to a new column called Mobile, but on the same data row so it remains with the same individual that provided the data on the online form. The other numbers can stay in the existing column and I can rename that Landline. I have attached a XLSX file with 2 tabs. One with the example data we get from our website and the other with the desired outcome.

Help please!!!

[maniacb]

Try

Please Login or Register  to view this content.

[maras_mak]

Try.

Please Login or Register  to view this content.

[marko198]

Thank you very much that has worked ok for me.

[marko198]

Great thank you that has worked very well for me. You have saved me soooooo much time! Thank you.