Изменение значения ячейки, если значение соседней ячейки меньше заданного.

[Денис Бухаров]

Доброго времени суток, Знатоки Excel

Сразу к делу.

Есть некая таблица на несколько тысяч строк в несколько стобцов.
Надобно изменить число ячейки в столбце B если число ячейки в столбце A меньше заданного.

В комплекте кусок таблицы с моим не работающим макросом:(
Подскажите пожалуйста, что не так и как решить эту задачу.

Заранее благодарствую.

[Шпец Докапыч]

Надобно изменить число ячейки в столбце B если число ячейки в столбце A меньше заданного.

Сейчас сравниваются два текста ("1000"<"2"), надо преобразовать их в число, например функцией Val, CLng или CDbl:

Код Выделить Развернуть

If Val(Range("A" & i).Value) < Val(PR) Then

[Денис Бухаров]

Большое спасибо!

Совсем забыл о фомате ячеек и вводимых данных.

Все работает!