Vai al contenuto principale

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::

1) Nel codice, specifica la tua password nella riga xPsw = “”.
2) Se vuoi solo proteggere automaticamente un foglio di lavoro specificato quando chiudi la cartella di lavoro, il codice VBA sottostante può aiutarti.
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:

1. È necessario salvare la cartella di lavoro come formato di file Cartella di lavoro con attivazione macro di Excel.
2. Vai al foglio di lavoro specifico, fai clic su Review > Rimuovi protezione foglio. Quindi digita la password che hai specificato nel codice VBA per rimuovere la protezione da questo foglio di lavoro.

Articoli correlati:

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

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...

Descrizione


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!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations