Сохранить группировку отдельно.

[Александр 45]

Приветствую.

Таблица Excel с группировками. Вложенность группировок разная. То есть в таблице и 3 и 4 уровни группировок могут быть, а могут только 2 уровень вложенности.
1. Можно отдельно сохранить данные (целиком строки!) второго уровня группировок? 
2. Или удалить все данные (и группировки) следующих уровней вложенности 3, 4 уровни вложенности?

Как сделал:
Вручную напротив каждой группировки второго уровня поставил "1"
отфильтровал по этой "1"
скопировал данные на второй лист.
Есть способ быстрей?

[Владимир .]

Добрый день.
Правильнее было бы приложить не скрины, а сам файл. Если там есть конфиденциальные данные, то замените их на любые другие ...

[Александр 45]

Ок. Два файла.
1 Исходные данные.
2 Результат который необходимо получить.

[Владимир .]

В модуль книги ...

Sub bob()
ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Select
Selection.Copy
Sheets.Add After:=ActiveSheet
ActiveSheet.Paste
End Sub

[Александр 45]

МАГИЯ!
Удивлен. Коротко, красиво, универсально!
Насколько понял: делает копию всего что в данный момент на листе "видно".

Владимир, огромное спасибо!