Come proteggere automaticamente tutti i fogli di lavoro quando si chiude la cartella di lavoro di Excel?
Normalmente, puoi proteggere manualmente un foglio di lavoro o l'intera cartella di lavoro tramite password con la funzione Proteggi foglio o Proteggi cartella di lavoro in Excel. Ma se vuoi proteggere automaticamente tutti i fogli di lavoro con una password alla chiusura della cartella di lavoro, cosa puoi fare? Questo articolo ti mostrerà un metodo VBA per ottenerlo.
Proteggi tutti i fogli di lavoro quando si chiude la cartella di lavoro di Excel con codice VBA
Proteggi tutti i fogli di lavoro quando si chiude la cartella di lavoro di Excel con codice VBA
Per proteggere automaticamente tutti i fogli di lavoro quando si chiude la cartella di lavoro, applicare il seguente codice VBA.
1. Nella cartella di lavoro che si desidera proteggere tutti i fogli di lavoro quando si chiude il file, premere il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare doppio clic su Questa cartella di lavoro nel riquadro di sinistra, quindi copia sotto il codice VBA nella finestra del codice. Vedi screenshot:
Codice VBA: protegge tutti i fogli di lavoro quando si chiude la cartella di lavoro
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Update by Extendoffice 2018/1/24
Dim xSheet As Worksheet
Dim xPsw As String
xPsw = ""
For Each xSheet In Worksheets
xSheet.Protect xPsw
Next
End Sub
Suggerimenti::
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Sheet1").Protect "123"
ActiveWorkbook.Save
End Sub
3. Quindi premere il pulsante altro + Q tasti per chiudere la finestra di Microsoft Visual Basic, Applications Edition.
Dopo il passaggio precedente, tutti i fogli di lavoro o il foglio di lavoro specificato verranno protetti automaticamente alla chiusura della cartella di lavoro.
Note:
Articoli correlati:
- Come utilizzare l'elenco a discesa in un foglio di lavoro protetto in Excel?
- Come bloccare le celle specificate senza proteggere l'intero foglio di lavoro in Excel?
- Come nascondere la formula ma visualizzare il risultato senza proteggere il foglio di lavoro in Excel?
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!