Slik beskytter & Opphev i Excel VBA

Beskyttelsen funksjonen Excel 2010 gjør det mulig å beskytte et regneark slik at alle som ikke vet et passord ikke kan endre arket. Det er en knapp i bånd som vil beskytte regnearket, men du kan også beskytte arket ved hjelp av Visual Basic for Applications (VBA), som medfølger Excel programvare. Det er mest vanlig å ha VBA-kode oppheve beskyttelsen et beskyttet regneark, utføre kommandoer på det ubeskyttede regnearket, og deretter sette den beskyttelsen på plass igjen.

Bruksanvisning

1 Åpne Excel-arbeidsbok som du vil arbeide med. Hold "Alt" og trykk "F11" for å starte VBA konsollen.

2 Velg modulen der du vil legge til kode fra listen på venstre side av VBA konsollen. Dobbeltklikk på modulen for å få opp koden på høyre side av skjermen. Hvis ingen modul er til stede, høyreklikker du på ett av regnearkene er oppført på venstre side av skjermen, beveger musen over "Sett inn" og velg "Module". Dobbeltklikk på modul som ser ut til å få opp et blankt ark på høyre side av VBA konsollen.

3 Klikk på høyre side av skjermen for å plassere markøren i den hvite boksen. Hvis boksen er tom, type "Sub navn ()," hvor "navn" er det du ønsker å navngi makro. Trykk enter for å fortsette, og Excel VBA vil automatisk gå inn i "End Sub" linje.

4 Skriv "Dim ws As Worksheet" direkte under din "Sub" linje. Hvis du arbeider med eksisterende kode, angir denne linjen hvor andre variabler deklareres og sikre at det ikke allerede er en annen variabel som heter "ws". Hvis det er, endre alle forekomster av "ws" i denne koden til alle tilgjengelige kombinasjon av to bokstaver.

5 Plasser markøren på neste linje, eller hvis du arbeider med eksisterende kode, plassere den hvor du vil oppheve beskyttelsen regnearket. Skriv inn følgende kode:

For hver ws I ActiveWorkbook.Worksheets

ws.Unprotect Passord: = "zzz"

Neste ws

Endre "zzz" i koden til hva din regneark passord er. Når du ønsker å beskytte regnearket igjen, bare skriv denne samme tre linjer med kode, bortsett fra endring "Opphev" å "beskytte".