Quote Originally Posted by snb View Post
or ?

Code:
Function snb_002(c00)
    snb_002 = Join(Filter(Split(Join(Filter(Split(c00, "."), "0"), "")), "0"))
End Function
Interesting... it never occurred to me that the OP might have wanted the returned value in the same cell (which I'm guessing he didn't given his response to my posting), however, that is a perfectly reasonable reading of the original posting. I don't know if you want to try to fix it or not (given the OP's response to my posting), but your output is incorrect for the 2nd sample data string....

CABLE AND WIRELESSINV. 2000680771USA

as it retains the USA which the OP showed as not desired in his example output. It is not clear if the other date format (the one that starts with three letters) could have unwanted attached letters on the end of it or not, so if you try to post a fix (for the record), you might want to assume yes and design your fix around it as well.