Jei platinote „Excel“ darbaknyges su apsaugotais lapais, greičiausiai gausite darbaknyges su apsaugotais lapais. Dažnai prieš tęsiant darbą reikia panaikinti darbaknygės darbalapių apsaugą. Jei pastebėsite, kad nuolat panaikinate darbalapių apsaugą, ši makrokomanda gali būti tik bilietas.
Kaip veikia makrokomandas
Kodą suaktyvina darbaknygės įvykis Atidaryti. Kai atidarote darbaknygę, šis įvykis suaktyvinamas, paleidžiant kodą. Ši makrokomanda automatiškai panaikina nurodyto lapo apsaugą su nurodytu slaptažodžiu, kai atidaroma darbaknygė:
Privati antrinė darbaknygė_Open()
„1 veiksmas: apsaugokite lapą slaptažodžiu
Lapai („Sheet1“). Panaikinkite slaptažodžio apsaugą:="RED"
Pabaigos sub
Makrokomandoje aiškiai įvardijamas lapas, kurio apsaugą norite panaikinti – šiuo atveju Sheet1. Tada jis perduoda slaptažodį, reikalingą lapo apsaugai panaikinti.
„Excel“ slaptažodžiuose skiriamos didžiosios ir mažosios raidės, todėl atkreipkite dėmesį į tikslų slaptažodį ir didžiąsias raides, kurias naudojate.
Kaip naudoti makrokomandą
Norėdami įdiegti šią makrokomandą, turite ją nukopijuoti ir įklijuoti į Workbook_Open įvykio kodo langą. Įdėjus makrokomandą, ji bus paleista kiekvieną kartą atidarius darbaknygę:
Suaktyvinkite Visual Basic redaktorių paspausdami Alt + F11.
Projekto lange raskite savo projekto / darbaknygės pavadinimą ir spustelėkite šalia jo esantį pliuso ženklą, kad pamatytumėte visus lapus.
Spustelėkite ThisWorkbook.
Išskleidžiamajame sąraše Įvykis pasirinkite Atidaryti įvykį.
Įveskite arba įklijuokite kodą naujai sukurtame modulyje, pakeisdami lapo pavadinimą (jei reikia) ir slaptažodį.
Įveskite savo kodą į darbaknygės atidarymo įvykį.