Come creare una protezione con password utilizzando una macro
Vuoi assicurarti che tutti i fogli di lavoro in una cartella di tua scelta siano protetti da password utilizzando una macro? Questo può essere utile se hai troppi problemi a proteggere i fogli di lavoro singolarmente o se vuoi proteggere automaticamente tutte le cartelle di lavoro in una directory. Utilizzare la seguente macro per assegnare la password "protezione" a tutti i fogli di lavoro nella cartella attiva:
Sub AllSchuetzen ()
Dim Sheet come foglio di lavoro
Per ogni foglio in ActiveWorkbook.Worksheets
Blatt.Protect ("protezione")
Foglio successivo
Fine sottotitolo
Invece del testo "Schutz", usa la password che preferisci. Naturalmente, questo codice di programma ha senso solo se lo si immette al di fuori della cartella di lavoro in cui si sta creando la protezione. Altrimenti, ogni utente può leggere la password nel testo sorgente VBA.
Per poter modificare qualcosa nei fogli di lavoro protetti, è necessario rimuovere la protezione. Puoi farlo manualmente con il comando EXTRA - PROTEZIONE - ANNULLA PROTEZIONE FOGLIA. Questo comando è disponibile solo se il foglio di lavoro corrente è effettivamente protetto.
Se si desidera rilasciare nuovamente tutti i fogli di lavoro protetti utilizzando una macro, utilizzare il seguente codice di programma:
Sotto TuttoEsposizione ()
Dim Sheet come foglio di lavoro
Per ogni foglio in ActiveWorkbook.Worksheets
Blatt.Unprotect ("protezione")
Foglio successivo
Fine sottotitolo
