Replace letters with exceptions

[bluefuel318]

I have a column that contains part numbers along with text, for example:

Pack 78101119220
Paint 78101118835
Pack ABC8620130
Dip ABCD8620131

I would like a macro to do a replace/delete/etc that would remove all letters from the column except for those within a part number, essentially leaving just the part number. In other words, replace all letters with blanks except for instances of "ABC" or "ABCD", which would leave the list above as:

78101119220
78101118835
ABC8620130
ABCD8620131


Anyone have any ideas?

 

[VoG]

Try in a spare column copied down

=RIGHT(A1,LEN(A1)-FIND(" ",A1))

 

[Jonmo1]

Would this be an accurate description of what you want?

I want the text to the right of the last space in the cell.


If so, try

=TRIM(RIGHT(SUBSTITUTE(A1," ",REPT(" ",LEN(A1))),LEN(A1)))

 

[bluefuel318]

Yes, the second works perfectly! (The first works, too, but if there is more than one word other than the material number in the cell, then the second one takes care of both). Thank you both so much!!!