Kui olete levitanud kaitstud lehtedega Exceli töövihikuid, saate tõenäoliselt töövihikud tagasi nii, et lehed on endiselt kaitstud. Sageli peate enne töö jätkamist töövihiku töölehed kaitse eemaldama. Kui leiate, et eemaldate pidevalt töölehtede kaitset, võib see makro olla lihtsalt pilet.
Kuidas makro töötab
Koodi käivitab töövihiku sündmus Open. Kui avate töövihiku, käivitub see sündmus, käivitades sees oleva koodi. See makro eemaldab töövihiku avamisel määratud parooliga määratud lehe kaitse automaatselt:
Privaatne alamtöövihik_Open()
1. samm: kaitske lehte parooliga
Sheets ("Leht1"). Eemalda salasõna kaitse:="PUNANE"
Lõpeta alam
Makro nimetab selgesõnaliselt lehele, mille kaitse soovite tühistada – antud juhul Sheet1. Seejärel edastab see lehe kaitse eemaldamiseks vajaliku parooli.
Exceli paroolid on tõstutundlikud, seega pöörake tähelepanu täpselt kasutatavale paroolile ja suurtähtedele.
Kuidas makrot kasutada
Selle makro rakendamiseks peate selle kopeerima ja kleepima sündmuse koodi aknasse Workbook_Open. Makro siia paigutamine võimaldab seda käivitada iga kord, kui töövihik avatakse:
Aktiveerige Visual Basic Editor, vajutades Alt+F11.
Leidke projektiaknas oma projekti/töövihiku nimi ja klõpsake kõigi lehtede nägemiseks selle kõrval olevat plussmärki.
Klõpsake nuppu See töövihik.
Valige ripploendist Sündmus suvand Ava sündmus.
Tippige või kleepige kood vastloodud moodulisse, muutes lehe nime (vajadusel) ja parooli.
Sisestage oma kood töövihiku avamise sündmusele.