Cum să extindeți sau să închideți toate rândurile și coloanele grupului din Excel?
În Excel, puteți utiliza utilitarul Grup pentru a grupa datele după cum aveți nevoie. Dar dacă există mai multe grupuri în foaie, cum puteți extinde sau închide rapid toate grupurile fără a face clic manual? Aici, introduc coduri VBA pentru a rezolva cu ușurință această lucrare în Excel.
Extindeți sau închideți toate grupurile rânduri și coloane în Excel
Extindeți sau închideți toate grupurile rânduri și coloane în Excel
Iată câteva coduri VBA care vă pot ajuta să extindeți sau să închideți toate grupurile simultan.
1. presa Alt + F11 tastele pentru a activa Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Module, copiați și lipiți codul de suflare în noul modul。
VBA: extindeți toate grupurile
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. presa F5 cheie, grupurile din Sheet1 au fost extinse.
Dacă doriți să închideți toate grupurile, puteți utiliza codul de mai jos:
Sub CollapseAll()
Worksheets("sheet1").Outline.ShowLevels 1, 1
End Sub
Notă: în codurile de mai sus, Sheet1 este foaia conține grupuri pe care le veți extinde sau închide. Vă rugăm să îl schimbați cu numele propriu al foii, dacă aveți nevoie.
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!