Noen ganger må du sende Excel arbeidsbok ut i verden med bestemte regneark beskyttet. Hvis du finner ut at du stadig Beskyttelse og åpning ark før du distribuerer dine arbeidsbøker, kan makroen her hjelpe deg.

Hvordan makro fungerer

Koden er utløst av arbeidsboken sin BeforeClose arrangement. Når du prøver å lukke arbeidsboken, denne hendelsen branner, kjører koden innenfor. Makro beskytter automatisk den angitte ark med den gitte passord, og deretter lagrer arbeidsboken:
Private Sub Workbook_BeforeClose (Cancel As Boolean) 'Trinn 1:. Beskytt arket med et passord Sheets ( "Ark1") Beskytt Passord: = "RED" "Trinn 2: Lagre arbeidsboken ActiveWorkbook.SaveEnd Sub

i trinn 1, du spesifisere hvilke ark for å beskytte - Ark1, i dette tilfellet. Du gir også passordet argument, Password: = "RED", som definerer passordet for å fjerne beskyttelsen

Dette passordet argumentet er valgfritt.. Hvis du utelater det, vil arket fremdeles være beskyttet, men du trenger ikke et passord for å oppheve det
. Excel passord er case-sensitive, slik at du ønsker å ta hensyn til den nøyaktige passord og kapitalisering at du bruker.

Trinn 2 forteller Excel for å lagre arbeidsboken. Hvis du ikke lagrer arbeidsboken, vil arket beskyttelsen du bare brukt ikke være i kraft neste gang arbeidsboken åpnes.

Hvordan bruke makro

For å gjennomføre denne makroen , må du kopiere og lime den inn i Workbook_BeforeClose hendelseskode vinduet. Plassering av makro her gjør det mulig å kjøre hver gang du prøver å lukke arbeidsboken.