Ovaj vodič će vas naučiti kako sakriti i otkriti radne listove s VBA -om.
Sakrij list u VBA
Da biste sakrili list u VBA, upotrijebite svojstvo Visible radnog lista.
Ili postavite svojstvo Visible na FALSE:
| 1 | Radni listovi ("List1"). Visible = False |
ili postavite svojstvo Visible na xlSheetHidden:
| 1 | Radni listovi ("List1"). Visible = xlSheetHidden |
To je isto kao da je korisnik desnom tipkom miša kliknuo karticu radnog lista i odabrao "sakrij".
Otkrij list
Da biste otkrili list u VBA -i, upotrijebite svojstvo Visible radnog lista:
| 1 | Radni listovi ("List1"). Vidljivo = Istina |
ili
| 1 | Radni listovi ("List1"). Vidljiv = xlSheetVisible |
Skrivene tablice mogu se vidjeti desnim klikom na području kartice Radni list:
Vrlo skriveni listovi
Svojstvo Sheet Visible ima treću opciju: xlSheetVeryHidden:
| 1 | Radni listovi ("List1"). Vidljivo = xlSheetVeryHidden |
Vrlo skriveni listovi skrivaju se desnim klikom u području kartice Radni list:
Ovaj kôd spriječit će korisnika proračunske tablice da vidi karticu Radni list pri dnu zaslona. Također skriva radni list od korisnika kada desnom tipkom miša kliknu kartice pri dnu. Jedini način da vidite da li radni list postoji (ili da otkrijete radni list) je otvaranjem uređivača Visual Basic.
Otkrijte vrlo skrivene listove
Vrlo skriveni radni listovi postaju vidljivi baš kao i obični skriveni radni listovi:
| 1 | Radni listovi ("List1"). Vidljivo = Istina |
ili
| 1 | Radni listovi ("List1"). Vidljiv = xlSheetVisible |
Sakrij / Otkrij listove u VBA Editoru
Također možete prebaciti svojstvo Vidljivi radni list u VBA Editor:
Sakrij sve kartice radnog lista
Možda biste također htjeli potpuno sakriti područje kartice Radni list kako biste spriječili korisnika da se kreće do različitih radnih listova. Saznajte više o skrivanju kartica radnog lista.
Sakrij / Otkrij listove u zaštićenoj radnoj knjizi
Vaša radna knjiga mora biti nezaštićena da biste mogli sakriti ili otkriti radne listove. Za uklanjanje zaštite strukture radne knjige upotrijebite sljedeći kôd:
| 1 | ActiveWorkbook.Unprotect |
Ako je struktura vaše radne knjige zaštićena lozinkom, morate učiniti sljedeće:
| 1 | ThisWorkbook.Unprotect "password" |
Otkrij sve tablice
Ovaj postupak će otkriti sve radne listove u radnoj knjizi, koristeći za svaku petlju:
| 12345678 | Sub Unhide_All_Sheets ()Zatamni kao radni listActiveWorkbook.UnprotectZa svaki ws u radnim listovimaws.Visible = xlSheetVisibleSljedećiKraj podm |
Imajte na umu da prvo uklanjamo zaštitu radne knjige, samo u slučaju da je zaštićena lozinkom.
