Как удалить символы?

Как удалить специальные символы и алфавиты в строке ?

 qwert1234*90)!  ' this might be my cell value

Я должен преобразовать ее в

 123490  ' I mean I have to remove everything but keep only the numbers in string

но она должна допускать пробелы !

 qwe123 4567*. 90  ' String with spaces
 123 4567 90     ' output should be

Я нашел vba Replace - но написание замены для каждого символа делает мой код большим. Хорошо, позвольте мне сказать вам четко, ничего не скрывая от вас:

1. input: qwe123 4567*. 90 ' Строка с пробелами ячеек(1, "A").value
2. Моя идея сделать это дальше: 123 4567 90 ' удалите символы, сначала сохранив пробелы
3. в окончательном выводе в A1:A3

   123
   . 4567
   90

Не могли бы вы рассказать мне, как удалить все символы, кроме цифр и пробелов в строке?

Спасибо заранее