Нумерация с учётом использования иерархии групп

Пользователь

Сообщений: 12 Регистрация: 16.05.2016

03.10.2018 11:50:58

Добрый день!
Подскажите пожалуйста как можно нумеровать с учётом использования иерархии групп.
Пример искомой нумерации по вложении.

Заранее спасибо за ответы!
С уважением, Илья.

Прикрепленные файлы

Book1.xlsx (10.28 КБ)

Михаил С.

Пользователь

Сообщений: 10514 Регистрация: 21.12.2012

03.10.2018 12:08:40

Код
Sub Test() Dim Cel As Range For Each Cel In Range(Cells(2, 1), Cells(Rows.Count, 1).End(xlUp)) Cel.IndentLevel = Cel.Value - 1 Next End Sub

Ilyatoo Пользователь Сообщений: 12 Регистрация: 16.05.2016	#3 03.10.2018 13:05:37 Спасибо Михаил, но я не смог воспроизвести.

_Boroda_ Пользователь Сообщений: 1496 Регистрация: 27.07.2013 Контакты см. в профиле	#4 03.10.2018 13:22:19 А нужно сделать как в каком столбце? И вообще - что дано и что нужно получить? Изменено: _Boroda_ - 03.10.2018 13:24:00 Скажи мне, кудесник, любимец ба’гов...

Михаил С. Пользователь Сообщений: 10514 Регистрация: 21.12.2012	#5 03.10.2018 13:35:40 макрос в стандартрном модуле Прикрепленные файлы Ilyatoo.xlsm (17.92 КБ)

Ilyatoo Пользователь Сообщений: 12 Регистрация: 16.05.2016	#6 03.10.2018 13:36:54 Даны столбцы: группа, номер, родитель Нужно получить столбцы: треб.номер, треб.родит.. Я их заполнил вручную, чтобы было понятнее что там нужно. Группа используется скорее для визуализации вложенности, этакое дерево. Номер - свободная нумерация. Родитель - ссылка на вышестоящий узел.