En Macro å oppheve et regneark på arbeidsbok Open

Hvis du har distribuert Excel arbeidsbøker med beskyttede ark, du sannsynligvis få arbeidsbøkene tilbake med ark fortsatt beskyttet. Ofte trenger du å oppheve regnearkene i en arbeidsbok før du fortsetter arbeidet. Hvis du finner ut at du er kontinuerlig åpning av regneark, kan denne makroen være nettopp billetten.

Hvordan makro verk

Koden er utløst av arbeidsboken Open arrangement. Når du åpner en arbeidsbok, utløser dette arrangementet, kjører koden innenfor. Denne makroen opphever beskyttelse automatisk den angitte arket med den gitte passord når arbeidsboken åpnes:
Private Sub Workbook_Open () 'Trinn 1:. Beskytt arket med et passord Sheets ("Ark1") Opphev Passord: = "RED" End Sub

Den makro eksplisitt navngir ark du ønsker å oppheve - Ark1, i dette tilfellet. Da den passerer passordet som kreves for å oppheve arket
. Excel passord bokstaver, så ta hensyn til den nøyaktige passord og bokstaver som du bruker.

Hvordan bruke makroen
< p> For å implementere denne makroen, må du kopiere og lime den inn i Workbook_Open hendelsen kodevinduet. Plassere makro her gjør det mulig å kjøre hver gang arbeidsboken åpnes.

  • Aktiver Visual Basic Editor ved å trykke Alt + F11

    I prosjektvinduet, finne et prosjekt /arbeidsbok navngi og klikk på plusstegnet ved siden av den for å se alle arkene.

    Klikk Thisworkbook.

    I tilfelle rullegardinlisten velger du Open arrangement. < .no>
    Skriv eller lim inn koden i den nyopprettede modulen, endre arket navn (om nødvendig) og passord.
    Tast inn koden din i arbeidsbok Open arrangement.