Extracting word for number of specific lenth to other cell

i want it as UDF (user Defined Function), reason is i will not have it in one cell,
it will be one column but 15 to 20 rows, so if i have udf i can extract from many rows, that is

A B
I went to at 12541 12541
we will walk at 45782 45782
i want to east 78541 east 78541

if use the UDF in B it will provide result as it appear in B column

Please help

regards

juzar para