Jak rychle vytisknout skryté listy v aplikaci Excel?
Pokud máte sešit, který obsahuje stovky listů, některé viditelné a jiné skryté, a nyní chcete vytisknout pouze skryté listy. Protože Excel ve výchozím nastavení nemůže vytisknout skryté listy, představím vám jednoduchý kód VBA pro tisk skrytých listů. Postupujte prosím následovně:
1. cvaknutí Vývojka > Visual Basic, Zobrazí se nové okno. Poté klikněte Vložit > Modul, poté vložte do modulu následující kódy:
VBA: tisk skrytých listů v aplikaci Excel
Dílčí tiskHiddenSheets ()
Dim list jako list
Dim CurStat jako varianta
Pro každý list v ActiveWorkbook.Worksheets
Pokud není wSheet.Visible Then
CurStat = wSheet.Visible
wSheet.Visible = xlSheetVisible
wSheet.PrintOut
wSheet.Visible = CurStat
End If
další
End Sub
2. A potom klikněte tlačítko ke spuštění kódu a vytisknou se všechny skryté listy.
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!