MS Excel. Группировка строк несвязанных дипазонов

Настройки MS Office, Open Office и пр. офисного ПО. Полезные советы и пр. То, чего не найдешь в бескрайних просторах Интернета. Решения тех проблем, которые не решаются типовыми ответами, которые можно получить в техподдержке Майкрософта - а именно: переустановить продукт или купить какой-ть другой лицензионный диск.


Модератор: UncleFather

Аватара пользователя
UncleFather
Site Admin
Сообщения: 1504
Зарегистрирован: 17 авг 2004 16:20, Вт
Контактная информация:

MS Excel. Группировка строк несвязанных дипазонов

Сообщение UncleFather »

Задача:

Имеется рабочая книга (документ) MS Excel с очень длинным списком. Этот список необходимо структурировать вручную, поскольку структура алгоритмизации не поддается.

Обычным способом делать долго: нужно

  1. выделить только одну группу ячеек

  2. зайти в меню -> Данные -> Группа и структура -> Группировать

  3. в появившемся окне указать, что группировать необходимо по строкам

Хотелось бы выделить сразу несколько несвязанных диапазонов ячеек и сгруппировать их нажатием одной кнопки, без дополнительных вопросов.

Решение:

Для этого пишем макрос и настраиваем новую кнопку в панели инструментов Excel на запуск этого макроса:

Спойлер

Код: Выделить всё

Sub RowsGroupping()

'
    With Selection
        For I = 1 To .Areas.Count
            Range(.Areas(I).Address).Rows.Group
        Next I
    End With
End Sub

Теперь, выделив несколько несвязных диапазонов ячеек:

Спойлер
01.JPG

одним нажатием кнопки получаем сгруппированные строки:

Спойлер
02.JPG

Alexander A. Manaeff©

Понравилась статья? Будем крайне признательны за репосты в соцсетях! Материально поддержать проект можно здесь

Мои странички:
ВКонтакте
Одноклассники
Youtube
Facebook
Instagram

Изображение
Изображение
Изображение
Изображение