Как правильно реализовать поиск и замену в макросе MS Excel

[SokeOner]

ВОТ Я ЛОСЬ!! азаїхахаххахахах!всьо работает отлично!
спасибо за все

[theInt]

А этот макрос делает замены только цифр? Попробовал использовать макрос для замены текста - но пишет вместо текста 0.
Т.е. тоже самое что и у вас, но в столбцах Б идет текст, а не цена.

[pashulka]

theInt, А Вы сами как думаете ? Если в задании требовалось найти товар и выбрать наименьшую цену (т.е. число) ...

P.S. А с текстом проще, достаточно заменить

Код: Выделить всё

Application.Min(iCellA(1, 2), iCellB(1, 2))

на

Код: Выделить всё

iCellB(1, 2)

[theInt]

theInt, А Вы сами как думаете ? Если в задании требовалось найти товар и выбрать наименьшую цену

Я к сожалению полный ноль в VB.
Спасибо - теперь текст заменяется.