Код |
---|
Nachalo = НачалоДанных lngKonec = КонецДанных For i = lngKonec To Nachalo Step -1 KodVd = Val(Cells(i, 4).Value) If KodVd > 0 Then If (KodVd >= 2203000000#) And (KodVd < 2207500000#) Then ' вот, после этой строчки нужно назначить последнюю ячейку именно этого диапазона, по 6 столбцу |
определить последнюю ячейку диапазона, есть код, в нём начало и конец таблицы определены, нужно ещё в диапазоне назначить
05.02.2019 10:48:28
"Именно этого диапазона" - это какого? Последнюю ячейку какую? Заполненную, покрашенную, специальным образом отформатированную?
Сплошные вопросы.... А был бы файл пример - все могло сложиться совсем иначе....
Кому решение нужно - тот пример и рисует.
|
|
|
|
05.02.2019 10:59:31
Пытливый, в 4 столбце макрос смотрит диапазон чисел от >= 2203000000 до < 2207500000 мне нужна последняя ячейка в 6 столбце указанного диапазона, пример прилагаю
слово "последняя", от слова ПОСЛЕДНИЙ, т.е ячейка должна соответствовать самому большому числу указанного диапазона.
Изменено: |
|
|
|
05.02.2019 11:22:05
UDF. Ваш пример ячейки с максимальным значением для диапазона чисел не верен
Согласие есть продукт при полном непротивлении сторон
|
|||
|
|
05.02.2019 11:30:13
|
|
|
|
05.02.2019 11:49:20
Согласие есть продукт при полном непротивлении сторон
|
|||||
|
|
05.02.2019 12:39:43
Sanja, ещё вопрос: а как вывести просто номер строки, в тех же условиях?
|
|
|
|
05.02.2019 12:42:36
Согласие есть продукт при полном непротивлении сторон
|
|||
|
|
05.02.2019 13:21:12
Sanja, прикольно получается: в моём коде половина вообще не нужна... спасибо за помощь!!
|
||||
|
|
|||