Split cell before number?

[majahops]

I have a column of cells that each contain a journal name followed by a date. I wish to split the cell into two, with one cell containing the journal name and the other cell containing the date.

For instance, a cell might now contain "Emergency Radiology 2000"

I want it to be split into "Emergency Radiology" in one cell and "2000" in another.

In other words, I need to learn to split at the first numerical character (which above would be "2", but is different for different cells).

Thanks so much!!! I eagerly await any responses.

[VBA Noob]

Assumes always two spaces as per example

To return text

=MID(A1,1,FIND(" ",A1,FIND(" ",A1)+1))

to return no

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

VBA Noob

[shg]

Alpha part: =TRIM( LEFT(A1, MIN( FIND({"0","1","2","3","4","5","6","7","8","9"}, A1 & 1234567890) -1) ) )

Everything starting with the first numeric character: =MID(A1, MIN( FIND({"0","1","2","3","4","5","6","7","8","9"}, A1 & 1234567890) ), 100)