Remove space hyphen space and move data to right to new col

[rz6657]

In the attached file, column A has ####[space]-[space]description...

I need the #### to remain in column A and the description to be moved to column B and the rest ([space]-[space]) to be removed... I have thousands of rows. I only provided a sample.

Note: in the event that a cell in a any row doesn't start with ####, skip/ignore instead of erroring out. Maybe highlight in red to address them separately.

Thx

[Arkadi]

Hi rz6657,

Something like this?

Please Login or Register  to view this content.

[mehmetcik]

If you have thousands of rows then use a Macro

Please Login or Register  to view this content.

[Rick Rothstein]

If I am not mistaken, I believe this macro will also work...

Please Login or Register  to view this content.

[Marc L]

According to the attachment as a VBA beginner starter :

Sub Demo1() 
         Columns(2).Insert 
    With [A1].CurrentRegion 
        .Replace " - ", vbTab, xlPart 
        .TextToColumns , xlDelimited, , , True, , , , False 
    End With 
         [B1] = "App" 
End Sub  

► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » ! ◄ ◄

[rz6657]

Thx to everyone with a quick fix. This is resolved.