Acest tutorial vă va învăța cum să ascundeți și să ascundeți foile de lucru cu VBA.
Ascundeți foaia în VBA
Pentru a ascunde o foaie în VBA, utilizați proprietatea Vizibilă a foii de lucru.
Fie setați proprietatea Vizibil la FALS:
| 1 | Foi de lucru ("Sheet1"). Vizibil = False |
sau setați proprietatea Visible la xlSheetHidden:
| 1 | Foi de lucru ("Sheet1"). Visible = xlSheetHidden |
Acesta este același lucru ca și când utilizatorul a făcut clic dreapta pe fila Foaie de lucru și a selectat „ascunde”.
Afișează foaia
Pentru a afișa o foaie în VBA, utilizați proprietatea Vizibilă a foii de lucru:
| 1 | Fișe de lucru („Foaie1”). Vizibil = Adevărat |
sau
| 1 | Foi de lucru ("Sheet1"). Vizibil = xlSheetVisible |
Foi ascunse pot fi văzute făcând clic dreapta în fila fila Foaie de lucru:
Foile foarte ascunse
Proprietatea Sheet Visible are a treia opțiune: xlSheetVeryHidden:
| 1 | Foi de lucru ("Sheet1"). Vizibil = xlSheetVeryHidden |
Foile foarte ascunse sunt ascunse atunci când faceți clic dreapta în zona filei Foaie de lucru:
Acest cod va împiedica utilizatorul foii de calcul să vadă fila Foaie de lucru din partea de jos a ecranului. De asemenea, ascunde foaia de lucru utilizatorului atunci când faceți clic dreapta pe filele din partea de jos. Singura modalitate de a vedea că foaia de lucru există (sau dezvăluie foaia de lucru) este prin deschiderea Editorului Visual Basic.
Afișează foile foarte ascunse
Foile de lucru foarte ascunse sunt făcute vizibile la fel ca foile de lucru ascunse obișnuite:
| 1 | Fișe de lucru („Sheet1”). Vizibil = True |
sau
| 1 | Foi de lucru ("Sheet1"). Vizibil = xlSheetVisible |
Ascunde / Afișează foi în editorul VBA
De asemenea, puteți comuta proprietatea Vizibilă a foii de lucru din Editorul VBA:
Ascundeți toate filele foii de lucru
S-ar putea să doriți, de asemenea, să ascundeți complet tabul Foaie de lucru pentru a împiedica utilizatorul să navigheze către diferite foi de lucru. Aflați mai multe despre ascunderea filelor foii de lucru.
Ascunde / Afișează foi în registrul de lucru protejat
Registrul dvs. de lucru trebuie să fie neprotejat înainte de a putea ascunde sau dezvălui foile de lucru. Pentru a vă proteja structura registrului de lucru, utilizați următorul cod:
| 1 | ActiveWorkbook.Deprotejează |
Dacă structura registrului dvs. de lucru este protejată prin parolă, trebuie să faceți acest lucru:
| 1 | ThisWorkbook.Defectați „parola” |
Afișează toate foile
Această procedură va afișa toate foile de lucru dintr-un registru de lucru, utilizând un Pentru fiecare buclă:
| 12345678 | Sub Unhide_All_Sheets ()Dim ws Ca foaie de lucruActiveWorkbook.DeprotejeazăPentru fiecare ws din foi de lucruws.Visible = xlSheetVisibleUrmătorulSfârșitul Sub |
Observați că mai întâi neprotejăm registrul de lucru, doar în cazul în care acesta era protejat prin parolă.
