Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Скрыть все группировки с помощью макроса и переход на другой лист
 
#1
02.03.2015 09:27:54
Здравствуйте! Помогите, пожалуйста, с макросом. Необходимо при нажатии кнопки на Листе 2 скрыть всю группировку на Листе 1(то есть все категории, подкатегории и пр) и просто перейти на Лист 1.
 
 
 
#2
02.03.2015 10:21:08
Что-то слишком легко получилось:
Код
Sub скрыть_группировку()
    Sheets(1).Outline.ShowLevels RowLevels:=1
    Sheets(2).Activate
End Sub
С уважением,
Федор/Все_просто
 
 
 
#3
02.03.2015 11:03:06
Спасибо, но тут проблема в том, что нужно и все подкатегории скрыть, которые открыты. Т.е все подгруппы каждой группы при нажатии кнопки должны закрыться.
Изменено: max-energe - 02.03.2015 12:17:55
 
 
 
#4
02.03.2015 11:43:46
Код
Sub HideLevels()
    Dim lLevCnt As Long
    Dim wssh As Worksheet
    Set wssh = Sheets(1)
    On Error Resume Next
    For lLevCnt = 8 To 1 Step -1
        wssh.Outline.ShowLevels lLevCnt
    Next
End Sub
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#5
02.03.2015 12:39:15
Спасибо огромное!
 
 
 
Страницы: 1
Наверх