Як розгорнути або закрити всі групові рядки та стовпці в Excel?
В Excel ви можете використовувати утиліту Групування для групування даних, як вам потрібно. Але якщо на аркуші багато груп, як можна швидко розгорнути або закрити всі групи, не натискаючи вручну? Тут я представляю коди VBA, щоб легко вирішити цю роботу в Excel.
Розгорніть або закрийте всі групи рядків і стовпців у програмі Excel
Розгорніть або закрийте всі групи рядків і стовпців у програмі Excel
Ось деякі коди VBA можуть допомогти вам розгорнути або закрити всі групи одночасно.
1. прес Alt + F11 клавіші, щоб увімкнути Microsoft Visual Basic для додатків вікна.
2. клацання Insert > Модулі, скопіюйте та вставте код удару в новий модуль。
VBA: Розгорніть усі групи
Sub ExpandAll()
'UpdatebyExtendoffice20181031
Dim I As Integer
Dim J As Integer
On Error Resume Next
For I = 1 To 100
Worksheets("Sheet1").Outline.ShowLevels rowLevels:=I
If Err.Number <> 0 Then
Err.Clear
Exit For
End If
Next I
For J = 1 To 100
Worksheets("Sheet1").Outline.ShowLevels columnLevels:=J
If Err.Number <> 0 Then
Err.Clear
Exit For
End If
Next J
End Sub
3. прес F5 Ключ, групи в Таблиці 1 були розширені.
Якщо ви хочете закрити всі групи, ви можете використати код нижче:
Sub CollapseAll()
Worksheets("sheet1").Outline.ShowLevels 1, 1
End Sub
Примітка: у наведених вище кодах Аркуш1 - це аркуш, що містить групи, які ви будете розширені або закриті. Будь ласка, змініть його на власне ім’я аркуша, якщо вам це потрібно.
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!