extract sring from last space

[anilg0001]

if my F range has
1935 E Bijou St 80909-5816
3030 N Hancock Ave 80907-5761
5490 Powers Center Pt. #148 80908

i need to split from last space

F range a
1935 E Bijou St
3030 N Hancock Ave
5490 Powers Center Pt. #148
G range as
80909-5816
80907-5761
80908

need a macro not equation

[p45cal]

Select the cells you want splitting and run:[VBA]Sub blah()
For Each cll In Selection.Cells
cll.TextToColumns DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 2), Array(InStrRev(cll.Value, " "), 2))
Next cll
End Sub[/VBA]