Jak skrýt sloupce na více listech v sešitu?
V aplikaci Excel můžeme rychle skrýt sloupce v jednom listu, ale zkusili jste někdy skrýt sloupce na více listech najednou? Normálně se můžete pokusit vybrat všechny listy a použít funkci Skrýt, ale nebude to fungovat úspěšně. V tomto článku budu hovořit o tom, jak rychle skrýt sloupce ve více pracovních listech?
Skrýt sloupce na více pracovních listech v sešitu s kódem VBA
Skrýt sloupce na více pracovních listech v sešitu s kódem VBA
Následující kód vám pomůže okamžitě skrýt konkrétní sloupce ve všech listech, udělejte to takto:
1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující kód do Modul Okno.
Kód VBA: Skrýt sloupce na více listech najednou:
Sub Hide_Columns()
'Updateby Extendoffice
Dim iWs As Integer
Dim sCol As String
On Error Resume Next
sCol = Application.InputBox("Input entire column,Eg A:A OR A:B", _
"Kutools for Excel", , , , , , 2)
If sCol = "" Then
MsgBox "Empty columns", vbInformation, "Kutools for Excel"
Exit Sub
End If
For iWs = 1 To ThisWorkbook.Worksheets.Count
ThisWorkbook.Sheets(iWs).Columns(sCol).Hidden = True
Next iWs
On Error GoTo 0
End Sub
3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a zobrazí se okno s výzvou, které vám připomene zadání sloupců, které chcete skrýt ve všech pracovních listech, viz screenshot:
4. A pak klikněte na tlačítko OK tlačítko, zadané sloupce byly skryty ve všech pracovních listech najednou.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!