Страницы: 1
RSS
как прономеровать строки в зависимости от групп
 
Доброго времени Уважаемые форумчане прошу подсказать способ проставить нумерацию строк по принципу сортировки,1 сортируем столбец С от А до Я, столбец D по возрастанию и в столбце E должны нумероваться строки по принципу C1=С2  и D1=D2 то нумеруемой строке добавляем 1, если нет, то начинаем с единицы. Но этой формулой пользоваться неудобно, так как строки сортируются и ее надо вставлять в отсортированный диапазон и протягивать. Может у кого то есть решение как избежать некорректных данных при сортировке. Заранее благодарен
 
Добрый день!
А что мешает данные полученные формулой перевести в значения ? И тогда при сортировке уже ничего не изменится.
 
в том то и дело что сначала мы сортируем столбцы С и D чтоб выстроить ряд для корректной работы формулы, далее вставляем формулу в ячейку E и протягиваем. Но это не удобно, потому что каждый раз надо формулу вставлять и протягивать
 
Если не хотите каждый раз вставлять формулу и протягивать - тогда только макросом.
 
это то понятно, но каким
 
alex1210, чет ничего не понял ...в Е2 листа "как есть"

=СЧЁТЕСЛИМН($C$1:C2;C2;$D$1:D2;D2)
Изменено: Mershik - 10.12.2019 09:28:32
Не бойтесь совершенства. Вам его не достичь.
 
alex1210, можно на кнопку (вкладку) вывести кнопку на макрос ниже.
Работать будет в любом месте.
Подойдет если данную операцию часто делаете.
Код
Public Sub fff()
ActiveCell.FormulaR1C1Local = "=ЕСЛИ(И(RC[-2]=R[-1]C[-2];RC[-1]=R[-1]C[-1]);R[-1]C+1;1)"
End Sub
 
Mershik, Спасибо огромное, так и должна работать
 
OblivionR, подскажите, а на какое событие работает макрос
 
alex1210, не на событие. Код вставляете в модуль, можно вывести кнопку, выделяете правую пустую ячейку от ваших данных и жмете ее.
Макрос вставит вашу формулу)
Изменено: OblivionR - 10.12.2019 09:45:57
 
OblivionR, а понял код вставляетс\я в первую ячейку по кнопке а потом протягиваешь вручную до конца диапазона
 
 OblivionR, понял, спасибо большое за помощь
 
Вариант
Страницы: 1
Наверх