Hvordan å oppheve flere regneark samtidig i

If Excel? Du er god til VBA-kode, kan følgende kode skal hjelpe deg raskt å oppheve flere ark samtidig.
1. Hold nede ALT + F11-tastene, og det åpner Microsoft Visual Basic for Applications vinduet.
2. Klikk Sett > Modul, og lim inn følgende kode i modulen Window.
Sub unprotect_all_sheets ()
On Error Goto booboo
unpass = InputBox ("passord")
< em> For hvert regneark I ActiveWorkbook.Worksheets
Worksheet.Unprotect Passord: = unpass
Neste
Exit Sub
booboo: MsgBox "Det er s problem - sjekk ditt passord, Capslock, etc. "
End Sub
tre. Deretter trykker F5 for å kjøre kode, og skriv inn passordet som du har søkt på de beskyttede ark. (verne arkene må ha samme passord) Se skjermbilde:
4. Klikk OK, og de beskyttede ark har vært ubeskyttet samtidig.

Opphev flere ark samtidig med Kutools for Excel
Kutools for Excel Opphev regneark er et nyttig verktøy som kan hjelpe deg raskt å oppheve flere ark med det samme passordet på en gang.
Kutools for Excel omfatter mer enn 120 praktiske Excel-verktøy. Gratis å prøve uten begrensning i 30 dager. . Få den nå
Etter installering Kutools for Excel, kan du gjøre som følger:
1. Klikk Enterprise > Opphev regneark, se skjermbilde:
to. I Opphev regneark dialogboksen vil de beskyttede ark bli oppført i regnearket listeboksen, så sjekk platenavnene du ønsker å oppheve, og klikk på OK, deretter inn passordet du har søkt på de beskyttede ark (de beskyttede ark må ha samme passord) i spratt ut dialogboksen, se skjermbilder:
3. Og deretter klikker OK, en rask boks vil minne deg på hvor mange plater har vært ubeskyttet. Klikk deretter på OK, har alle de valgte arkene vært ubeskyttet i arbeidsboken. Se skjermbilde:
Klikk Kutools for Excel til å vite mer om denne funksjonen
.