Kako hitro natisniti skrite delovne liste v Excelu?
Če imate delovni zvezek, ki vsebuje na stotine delovnih listov, nekaj vidnih in drugih skritih, zdaj pa želite natisniti le skrite delovne liste. Ker Excel privzeto ne more natisniti skritih listov, vam bom predstavil preprosto kodo VBA za tiskanje skritih delovnih listov. Naredite naslednje:
1. klik Razvojni > Visual Basic, Prikazalo se bo novo okno. Nato kliknite Vstavi > Moduli, nato v modul vnesite naslednje kode:
VBA: natisnite skrite delovne liste v Excelu
Sub PrintHiddenSheets ()
Zatemni list kot delovni list
Dim CurStat kot različica
Za vsak wSheet v ActiveWorkbook.Worksheets
Če ni wSheet.Visible Potem
CurStat = wSheet.Visible
wSheet.Visible = xlSheetVisible
wSheet.PrintOut
wSheet.Visible = CurStat
Konec Če
Naslednji
End Sub
2. In nato kliknite za zagon kode in vsi skriti delovni listi bodo natisnjeni.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!