Правка-Найти пробелы

[ZORRO2005]

Подскажите пожалуйста,
1. Как с помощью Правка-Найти найти и заменить пробелы в листе?
" " -не проходит.
2. Как заменить Символ(допустим СИМВОЛ(16))?

С помощью функций ПОДСТАВИТЬ,НАЙТИ заменить в отдельных ячейках получается.
Но мне нужно заменить во всем листе.

[pashulka]

1. На самом деле, осуществить замену подобным способом можно, только желательно учитывать, что замена не предназначена для работы со значениями, которые возвращают различные формулы.
Проще говоря, если в рабочем листе наличествует формула ="Zorro"&ПОВТОР(СИМВОЛ(32);25)&"200 5" то удалить пробелы из полученного текста, просто так, не получится.
Однако, если перед заменой заменить формулы на результат их вычислений, т.е. выделить нужный диапазон, в меню Правка выбрать команду Копировать (CTRL+C), затем в меню Правка выбрать команду Специальная вставка, установить переключатель напротив Значения, кликнуть кнопку OK. После чего, опять же в меню Правка выбрать команду Заменить (CTRL+H) и в поле Что: ввести один пробел (без кавычек и других нежелательных символов), а в поле Заменить на: ввести нужный текст (для удаления пробелов - это поле желательно оставить пустым) и нажать кнопку Заменить всё, то Вы получите ожидаемый результат.

2. Для ввода подобных символов можно использовать комбинацию клавиш ALT+код, например ALT+0134, но ввод таких символов, если мне не изменяет память, начинается с 0032, поэтому, могу предложить только следующее :

Application.Dialogs(xlDialogFormulaReplace).Show Arg1:=Chr(16) ', Arg2:="Новый текст"

If TypeOf Selection Is Range Then _
   Selection.Replace What:=Chr(16), Replacement:="Новый текст"
   'перед заменой не мешает проверить не защищены ли ячейки+лист

[ZORRO2005]

pashulka
Спасибо большое