Try using the Text to Column function under the Data menu. Choose
delimited and use a space as the delimiter. Otherwise, I would use a
formula as suggested by another poster. Finally, if that doesn't work,
you might try using Regular Expressions in VBScript. I won't go into
that if the other two ideas work.

Thanks,
Johnny