excel - Finding the last letter in a random string of letters and number -

i want able have string consisting of numbers , letters in cell. able split text (and including) last letter in 1 cell, remaining numbers in next cell.

for example, if string "sdgs214njkdsf123" "sdgs214njkdsf" in 1 cell , "123" in other.

assuming value in a1:

sub splitter() = range("a1").value = len(a) 1 step -1     if not isnumeric(mid(a, i, 1)) exit next part1 = left(a, i) part2 = right(a, len(a) - i) end sub