Note: The other languages of the website are Google-translated. Back to English

Come proteggere più fogli di lavoro contemporaneamente in Excel?

Supponendo che tu abbia una cartella di lavoro che contiene più fogli di lavoro e ora devi proteggere tutti i fogli di lavoro o alcuni fogli di lavoro specifici, normalmente in Excel, puoi solo proteggere il foglio uno per uno con la funzione Proteggi foglio, ma questo metodo è noioso e richiede tempo se ci sono numerosi fogli che devono essere protetti. Come si proteggono più fogli contemporaneamente in Excel in modo rapido e semplice?

Proteggi tutti i fogli contemporaneamente con il codice VBA

Proteggi più fogli contemporaneamente con Kutools per Excel

Rimuovi la protezione di più fogli contemporaneamente con kutools per Excel


freccia blu freccia destra Proteggi tutti i fogli contemporaneamente con il codice VBA

Con il seguente codice VBA, puoi proteggere tutti i fogli della cartella di lavoro attiva contemporaneamente con la stessa password, fai come segue:

1. Tieni premuto il ALT + F11 chiavi e apre il file Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduloe incolla il codice seguente nel file Finestra del modulo.

Codice VBA: proteggi tutti i fogli di lavoro in una cartella di lavoro contemporaneamente:

Sub protect_all_sheets()
top: 
pass = InputBox("password?") 
repass = InputBox("Verify Password") 
If Not (pass = repass) Then 
MsgBox "you made a boo boo" 
Goto top 
End If 
For i = 1 To Worksheets.Count 
If Worksheets(i).ProtectContents = True Then Goto oops 
Next 
For Each s In ActiveWorkbook.Worksheets 
s.Protect Password:=pass 
Next 
Exit Sub 
oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets then running this Macro." 
End Sub

3. Quindi premere F5 chiave per eseguire il codice e inserire la password per i fogli protetti nella finestra del prompt, vedere screenshot:

doc-protect-multiple-sheet1-1

4. Clic OK, quindi immettere nuovamente la password per confermare la password.

doc-protect-multiple-sheet2-2

5. Quindi fare clic OKe tutti i fogli sono stati protetti con la stessa password.


freccia blu freccia destra Proteggi più fogli contemporaneamente con Kutools per Excel

A volte, non vuoi proteggere tutti i fogli della tua cartella di lavoro e vuoi solo proteggere alcuni fogli specifici, in questa situazione, il codice sopra non funzionerà. Ma con Kutools for Excel'S Proteggi foglio di lavoro utility, puoi proteggere sia tutti i fogli che fogli specifici in modo rapido e semplice.

Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 60 giorni

Dopo l'installazione Kutools for Excel, si prega di fare come segue:

1. Clic Kutools Plus > Proteggi foglio di lavoro, vedi screenshot:

2. Nel Proteggi foglio di lavoro finestra di dialogo, selezionare i fogli che si desidera proteggere. (Per impostazione predefinita, tutti i fogli di lavoro all'interno della cartella di lavoro corrente sono controllati.) Vedi screenshot:

doc-protect-multiple-sheet4-4

3. E fare clic su OK, quindi digita e conferma la password nella finestra di dialogo Proteggi foglio di lavoro. Vedi screenshot:

doc-protect-multiple-sheet5-5

4. Quindi fare clic OK, i fogli di lavoro selezionati sono stati protetti.

Fare clic su Proteggi foglio di lavoro per saperne di più su questa funzione.


freccia blu freccia destra Rimuovi la protezione di più fogli contemporaneamente con kutools per Excel

Come puoi rimuovere la protezione da più fogli di lavoro protetti in una cartella di lavoro contemporaneamente? Ovviamente, Kutools for Excel fornisce anche il Rimuovi la protezione del foglio di lavoro utilità per rimuovere immediatamente la protezione.

Si prega di fare con i seguenti passaggi:

1. Apri la tua cartella di lavoro che contiene i fogli di lavoro protetti.

2. Quindi fare clic Kutools Plus > Rimuovi la protezione del foglio di lavoro, vedi screenshot:

3. Nel Rimuovi la protezione del foglio di lavoro finestra di dialogo, i fogli protetti vengono elencati nella casella di riepilogo, quindi fare clic su Ok pulsante, vedi screenshot:

doc-protect-multiple-sheet7-7

4. E poi a Rimuovi la protezione del foglio di lavoro la finestra di dialogo si apre per ricordarti di inserire la password che hai creato per proteggere i fogli di lavoro, vedi screenshot:

doc-protect-multiple-sheet8-8

5. Dopo aver digitato la password, fare clic su Ok, tutti i fogli di lavoro selezionati nella casella di riepilogo non sono stati protetti.

NOTA: I fogli di lavoro devono avere la stessa password.

Per saperne di più su questa funzione Unprotect Worksheet.

Scarica e prova gratuitamente Kutools per Excel ora!


freccia blu freccia destra Demo: proteggi o rimuovi la protezione di tutti i fogli di lavoro contemporaneamente con Kutools per Excel

Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Scarica e prova gratuita ora!

Articolo correlato:

Come rimuovere la protezione da più fogli di lavoro contemporaneamente in Excel?


I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il 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!
fondo officetab
Commenti (21)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Fantastico, quindi come DISproteggerli tutti in una volta? Sono un dilettante, quindi ho bisogno di maggiori informazioni.
Questo commento è stato fatto dal moderatore sul sito
[quote]Ottimo, quindi come DISproteggerli tutti in una volta? Sono un dilettante, quindi ho bisogno di maggiori informazioni.Di Kristin Dzugan[/quote] :-) Puoi facilmente rimuoverli come http://www.extendoffice.com/product/kutools-for-excel/excel-unprotect-multiple-sheets.html
Questo commento è stato fatto dal moderatore sul sito
Sub unprotect_all_sheets() top: pass = InputBox("password?") repass = InputBox("Verify Password") Se no (pass = repass) Allora MsgBox "hai fatto un boo boo" Vai a top End If For i = 1 To Worksheets .Count Next For Each s In ActiveWorkbook.Worksheets s.Unprotect Password:=pass Next Exit Sub oops: MsgBox "Penso che tu abbia alcuni fogli che sono già protetti. Per favore sproteggi tutti i fogli B4 che eseguono questa Macro." Fine Sub
Questo commento è stato fatto dal moderatore sul sito
Grazie mille :-)
Questo commento è stato fatto dal moderatore sul sito
Come ha detto Kristin, come fai a non proteggerli tutti in una volta?
Questo commento è stato fatto dal moderatore sul sito
Quindi, come posso rimuovere la protezione senza kutools?
Questo commento è stato fatto dal moderatore sul sito
[quote]Quindi, come faccio a rimuovere la protezione senza kutools?di cz[/quote] Puoi annullare la protezione del foglio di lavoro senza Kutools per Excel. Devi solo fare clic con il pulsante destro del mouse sulla scheda del foglio che desideri rimuovere dalla protezione e fare clic sul comando Annulla protezione foglio, quindi inserire la password. :-)
Questo commento è stato fatto dal moderatore sul sito
quando inserisco il codice, viene visualizzato "errore di runtime 1004?? evidenziando quanto segue in giallo ... s.Protect Password:=pass
Questo commento è stato fatto dal moderatore sul sito
All'improvviso ho anche l'errore 1004. Uso la macro da mesi ma ora non funziona.
Questo commento è stato fatto dal moderatore sul sito
Salve, anch'io avevo questo problema. Risulta che non può essere eseguito se tutti i fogli sono selezionati nella cartella di lavoro. Prova a selezionare solo un foglio e poi a correre.
Questo commento è stato fatto dal moderatore sul sito
All'improvviso ho il problema dell'errore 1004. Sto usando la macro da mesi ormai non riesce casualmente.
Questo commento è stato fatto dal moderatore sul sito
All'improvviso ho anche l'errore 1004. Qualcuno trova una soluzione?
Questo commento è stato fatto dal moderatore sul sito
quando ho attivato questo VBA, collegamento ipertestuale non funziona. come posso farli funzionare? grazie :)
Questo commento è stato fatto dal moderatore sul sito
Grazie! Questo è fantastico, sono stato persino in grado di modificare il codice VBA in modo da poter rimuovere la protezione di tutti i fogli contemporaneamente! :) Sub unprotect_all_sheets() top: pass = InputBox("password?") repass = InputBox("Verify Password") If Not (pass = repass) Allora MsgBox "hai fatto un boo boo" Vai a top End If For i = 1 To Worksheets.Count Next For Each s In ActiveWorkbook.Worksheets s.Unprotect Password:=pass Next Exit Sub oops: MsgBox "Penso che tu abbia alcuni fogli che sono già protetti. Rimuovi la protezione da tutti i fogli B4 che eseguono questa macro." Fine Sub
Questo commento è stato fatto dal moderatore sul sito
Ehi, ho bisogno di aiuto, il codice sopra è stato molto utile, ma blocca l'ordinamento (anche filtro automatico) puoi fornire il codice per risolvere quel problema e anche dove sarebbe stato inserito. Grazie in anticipo.
Questo commento è stato fatto dal moderatore sul sito
Ho schede dei grafici e fogli di lavoro nella mia cartella di lavoro di Excel 2013. La codifica VBA sopra funziona per proteggere i fogli di lavoro ma non le schede separate del grafico. Come faccio a proteggere con password le schede multiple del grafico e più fogli di lavoro nella mia cartella di lavoro? Grazie!
Questo commento è stato fatto dal moderatore sul sito
Ciao ho usato questo codice ora non accetterò la mia password per tornare nel mio foglio di calcolo !!
Questo commento è stato fatto dal moderatore sul sito
Come mascherare la password utilizzando il metodo VBA? Non riesco a trovare queste informazioni tramite i file della guida di Google o F1. Grazie in anticipo!
Questo commento è stato fatto dal moderatore sul sito
Grazie per il meraviglioso strumento completo per proteggere e rimuovere la protezione tutti i fogli alla volta. Per favore, guidami. Sono in grado di rimuovere la protezione di tutti i fogli nel mio libro di lavoro alla volta, ma quando eseguo proteggi tutti i fogli Codice VBA, solo i primi 4 fogli sono protetti e riposano o non sono protetti. Per favore aiutami a risolvere il problema.
Questo commento è stato fatto dal moderatore sul sito
Sto cercando di usarlo in una cartella di lavoro condivisa ma ricevo un errore di Microsoft Visual Basic "Errore di runtime '1004": errore definito dall'applicazione o dall'oggetto" Sto solo cercando suggerimenti su come aggirare questo problema. l'aiuto sarebbe apprezzato
Questo commento è stato fatto dal moderatore sul sito
Si verifica quando il foglio è già bloccato
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL