Kako odjednom otkriti sve sakrivene listove u Excelu?

Ponekad korisnici Excela sakrivaju listove u radnoj bilježnici iz različitih razloga. Dok jedan list ili više njih koje prethodno označite možete jednostavno sakriti odabirom opcije Hide (desni klik na oznaku bilo kojeg lista), otkrivanje listova nije baš jednostavno kako bi se to moglo očekivati.

Otkriti jedan list nije neki problem, kliknete desnom tipkom na oznaku bilo kojeg lista i odaberete Unhide.

Unhide sheet

Ako pak želite otkriti sve sakrivene listove odjednom, e to baš ne ide kako ste vjerojatno zamislili, za to je potrebno koristiti VBA kod.

Za slučaj kada radna bilježnica nije zaštićena lozinkom (Review, Protect Workbook), otkrivanje radnih listova (kolekcija Worksheets) se može izvršiti pokretanjem sljedećeg programskog koda:

Sub UnHide_Worksheets()
    Dim wks As Worksheet

    For Each wks In Worksheets
        wks.Visible = xlSheetVisible
    Next wks
End Sub

Ako pak želite otkriti sve listove tj. radne listove (Worksheet) i listove s grafikonima (Chart) tada možete koristiti sljedeći VBA kod:

Sub UnHide_Sheets()
    Dim sht As Object

    For Each sht In Sheets
        sht.Visible = xlSheetVisible
    Next sht
End Sub

 

U slučaju da ne želite upisivati kod i pokretati ga u VBA editoru ili na neki drugi način, možete koristiti Add-In za tu namjenu. Nakon instalacije ovog dodatka, programski kod za otkrivanje svih listova možete koristiti u bilo kojoj radnoj bilježnici, a pokrenuti ga možete uz Alt+Ctrl+Shift+U ili desnim klikom na oznaku nekog lista te odabirom naredbe Unhide All Sheets.

Otkrivanje svih Excel listova

Za detalje i preuzimanje pogledajte stranicu UnHide All Sheets.

 

 

Odgovori

Vaša adresa e-pošte neće biti objavljena. Nužna polja su označena s *