You could duplicate the column (call it DupColumn) then change the type of the new column to Whole number. This will throw an error on the values that are text. We can use this info to create 2 new columns.
Using 'Add Column'->Custom column from the menu.
1st New Column (the numbers) :
try [DupColumn] otherwise null
2nd New Column (the text):
let x = try [DupColumn]
if x[HasError] then [Column1] else ""
Column1 is the name of your original column, just edit that part.
From there you can tidy up the datatypes, blanks and nulls to get the data in a form you want.