Копирование строчек по разным столбцам на другой лист

[lilpop]

Здравствуйте!
мучаюсь уже несколько дней с кодом(недавно начала изучение VBA).
Нужно скопировать строчки с Лист1 на Лист2, но так, чтобы код был универсальным (чтобы можно было проделать эту процедуру с другими листами, но с такими же строчками и столбцами).
Проблема еще заключается в том, что подпунктов 1.1.1.1 или 1.1.2.1 или 1.1.2.4.1 и т.д. может быть неопределенное количество. Также могут появиться подпункты (например, 1.1.2.4.1.1, которые идут в подразделение 5), которые должны быть в столбце "5 уровень" Лист2.
Прикладываю файл для примера. На лист2 уже скопировала ручками строчки и разнесла по столбцам.
макрос должен работать на винде
Заранее спасибо!

[Aleksandr H.]

такой вариант по фану:
идем по столбце А;
берем данные с ячейки;
удаляем последний символ, если ето точка;
считаем количество точек в записи, после предыдущего поста (п1);
значение из столбца В пишем на лист2 в столбец номер (п1) - 1

плюсом допилка названий уровней

[lilpop]

Aleksandr H.,

не совсем поняла как это сделать, не могли бы Вы в виде кода написать?

[Elixi]

lilpop,
скажите, правильные ли там у вас наименoвания?

Смoтрите Лист1, стрoка 30:
стoлбец "A" = 1.1.2.4 (№ п/п)
стoлбец "B" = Подраздел Орг 1.2.1 (Наименование структурного подразделения Организации1)

[lilpop]

да, там все верно