Удаление всех пробелов в ячейке

Удаление всех пробелов в ячейке, VBA

Ball_bes Пользователь Сообщений: 61 Регистрация: 21.08.2014	#1 05.03.2015 15:23:23 Нужно кодом из "Иванов Иван Иванович - 2015" получить "ИвановИванИванович-2015". Как сделать формулой нашёл: =СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1;СИМВОЛ(32);СИМВОЛ(160)) А как на VBA удалить все пробелы?

webley Пользователь Сообщений: 2158 Регистрация: 01.01.1970	#2 05.03.2015 15:26:27 ActiveCell=Replace(ActiveCell," ","") в конце разумеется скобка Изменено: webley - 05.03.2015 15:28:37

Ball_bes Пользователь Сообщений: 61 Регистрация: 21.08.2014	#3 05.03.2015 15:42:49 Спасибо!