"Переносной" макрос

[OmegaBerkut]

Здравствуйте.
У меня есть куча файлов Excel, разных форматов (xls/x, csv), и есть десяток операций, которые нужно проводить над всей информацией каждого файла. Файлы каждый день приходят новые.

Насколько я понял, макрос привязывается к конкретному файлу, и таким образом упрощая выполнение операций над данными, я получаю ежедневную привязку макроса ко всем файлам; другими словам - меняю шило на мыло.

Мне нужно автоматизировать поиск/замену символов; это прайс-листы, и у них всех постоянно встречаются служебные символы, которые мешают при выгрузке в базу данных.

Что вы можете посоветовать ?

[IgorGO]

Насколько я понял, макрос привязывается к конкретному файлу

нет у макроса есть прописка, где-то он находится (в каком-то файле, в камом-то модуле, как-то называется) а вот обрабатывать он может что угодно в каком угодно количестве и где угодно находящееся, главное чтобы был доступ к файлу и достаточно прав на редактирование.
т.е. как написали - так и работает.
я советую написать универсальный макрос а точнее несколько:
1. макрос обработки файла
2. макрос, который будет находить нужные файлы и по очереди передавать их первому макросу для обработки.

[OmegaBerkut]

IgorGO, хорошо ...
Но у меня следующая проблема: я с vba-excel сталкиваюсь впервые, и пытаюсь разобраться - как выполнить обход по всем ячейкам ?
Мне нужно во всех ячейках выполнить замену символов, И есть одно важное замечание: я реализовал алгоритм на C++ с использованием необходимой библиотеки - там всё выполняется очень медленно.
Стандартная же функция замены работает достаточно быстро.
Мне не нужны усложнения, так что можно считать, что у меня один лист в каждом файле.
Что мне делать ? В гугле вроде не забанен, но нужное найти не могу (не знаю что и как искать)

[Аватар]

Есть же возможность зафиксировать все действия пользователя в макросе. Ну и на основании полученного своё произведение сделать ))

http://exceltip.ru/%D0%BA%D0%B0%D0%B...F%D0%B8%D1%81/

[OmegaBerkut]

Сообщение от Аватар

зафиксировать все действия пользователя

Пасиба (оставить отзыв не получилось)

[OmegaBerkut]

Опять проблема (как же без них, да ещё и со мной) ...
Есть следующее условие

Selection.Find("  ") <> Nothing

Это условие для выполнения цикла ("схлопывание" пробелов).
На условие в текущем его виде ругается, мол "Invalid use of object".
Я пошёл в гугл, нашёл
- это (функция поиска, возвращает объект Range/Nothing),
- и это (числовое/строковое сравнение Nothing).

Исходя из полученной информации я понял, что я пытаюсь сравнивать объекты (не компилируется), а когда пытаюсь сравнить с нулём или пустой строкой - выпадает Runtime error.

Как мне быть ?

UPD: разобрался, вместо <> нужно юзнуть Is.

[IgorGO]

с проверкой на Nothing в VBA так:
if not Selection.Find(" ") is Nothing then ' значит что-то нашлось