Come proteggere e Rim in Excel VBA

September 15

La funzione di protezione Excel 2010 consente di proteggere un foglio di lavoro in modo che chiunque che non sa una parola d'ordine non può modificare il foglio. C'è un pulsante nella barra multifunzione in grado di proteggere il foglio di lavoro, ma si può anche proteggere il foglio utilizzando Visual Basic, Applications Edition (VBA), fornito di serie con il software di Excel. E 'più comune per avere il codice VBA sproteggere un foglio di lavoro protetto, eseguire comandi sul foglio di lavoro non protetto, e poi mettere la protezione al suo posto.

istruzione

1 Aprire la cartella di lavoro di Excel che si desidera lavorare. Tenere premuto "Alt" e premere "F11" per avviare la console VBA.

2 Selezionare il modulo in cui si desidera aggiungere il codice dalla lista sul lato sinistro della console VBA. Fare doppio clic sul modulo per visualizzare il codice sul lato destro dello schermo. Se nessun modulo è presente, fare clic destro su uno qualsiasi dei fogli di lavoro elencate sul lato sinistro dello schermo, spostare il mouse sopra "Inserisci" e scegliere "modulo". Fare doppio clic sul modulo che sembra portare un foglio bianco sul lato destro della console VBA.

3 Fare clic sul lato destro dello schermo per posizionare il cursore nella casella bianca. Se la casella è vuota, digitare "nome Sub ()," dove "nome" è tutto ciò che si desidera denominare la macro. Premere Invio per continuare, e Excel VBA entrerà automaticamente la linea "End Sub".

4 Digitare "ws fiochi come foglio di lavoro" direttamente sotto la linea "Sub". Se si lavora con il codice esistente, inserire questa riga, ovunque sono dichiarate le vostre altre variabili e assicurarsi che non ci sia già un'altra variabile denominata "ws". Se c'è, cambiare tutte le istanze di "WS" in questo codice a qualsiasi combinazione di due lettere disponibili.

5 Posizionare il cursore sulla riga successiva, o se si sta lavorando con il codice esistente, posizionarlo ovunque si desidera rimuovere la protezione del foglio di lavoro. Inserire nel codice seguente:

Per ogni WS ActiveWorkbook.Worksheets

ws.Unprotect Password: = "zzz"

WS Avanti

Cambiare "zzz" nel codice a tutto ciò la password del foglio di lavoro è. Quando si desidera proteggere nuovamente il foglio di lavoro, basta inserire questo stesso tre righe di codice, tranne il cambiamento "sproteggere" per "proteggere".