Come prima cosa andate su File-Opzioni-Centro protezione-Impostazioni Centro protezione-Impostazioni macro.
Selezionate Abilita tutte le macro (scelta non consigliata, potrebbe essere eseguito codice pericoloso) e Considera attendibile l'accesso al modello a oggetti dei progetti VBA.

(Se volete approfondirne il significato -anche per capire cosa state facendo- seguite la mia guida su Come attivare/disattivare le Macro in Excel).
Adesso cliccate Ok e non uscite dalle Opzioni.
Andate su Personalizzazione barra multifunzione e abilitate sulla destra la voce Sviluppo:

Dopo questa fase preparatoria siete pronti per il secondo metodo.
Nella home di Excel è comparsa la scheda Sviluppo dalla quale potremo avere dei percorsi semplificati per le varie operazioni:

Cliccate su Visualizza codice e vi ritroverete nella schermata trovata nella precedente guida.
Incollate il famoso codice:
Sub SbloccaFogliExcel()
'Sblocca i fogli excel bloccati da password. comesapere.com
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "Foglio Excel sbloccato. Powered by Come Sapere "
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
Incollate il famoso codice:
Sub SbloccaFogliExcel()
'Sblocca i fogli excel bloccati da password. comesapere.com
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "Foglio Excel sbloccato. Powered by Come Sapere "
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub

Stavolta NON PREMETE sul tasto Play evidenziato nella foto sopra; nella Barra delle Applicazioni di Windows in basso cliccate su Excel già aperto per tornare al programma. In alternativa chiudete direttamente la pagina, non perderete il modulo:

Sempre dalla scheda Sviluppo cliccate su Macro e vi si aprirà la finestra come nell'immagine sottostante:

Cliccate su Esegui per vedervi apparire il fatidico messaggio di sblocco! (i tempi variano a seconda della complessità della password):

Qui trovate anche il video:
Sei un grande !! Sbloccato !!
RispondiEliminaHo buttato 29€ per scaricare Password Recovery Bundle 2012, che ha lavorato tutta la notte e mi ha trovato una password che non funziona neanche...
Questo sito nasce proprio per risparmiare su queste ruberie...mi spiace che tu ci sia capitato dopo...se ti è stata utile magari condividila!
Eliminaa me appena accedo al vba chiede la password e quindi non posso inserire codice nel modulo
RispondiEliminac'è una soluzione?
Hai provato con entrambi i metodi?
EliminaCiao
RispondiEliminaho eseguito le tue istruzioni per sbloccare un foglio Excel ma senza successo.
Hai qualche altra indicazione? Il file è stato creato con Excel 2013 e la versione di Windows è la 7.
Grazie
Hai provato con entrambi i metodi?
EliminaImpossibile eseguire il codice in modalità interruzione.
RispondiEliminaQualche soluzione?
Impossibile eseguire il codice in modalità interruzione?
RispondiEliminaQualche soluzione?
Semplicemente c'è una macro che ti blocca, disattivala. Prova con il pulsante "Ripristina" della barra Standard o Debug.
EliminaCiao ho provato su svariati sistemi (win 7 10 ed 8) entrambe le procedure, ma nulla. Mi si blocca e dopo un po dice il programma non risponde. Idee? Grazie Ragazzi!!
RispondiEliminall check back later on and see if the problem still exists.
RispondiEliminaCiao ho provato entrambi i metodi, ma dopo svariati minuti di elaborazione va in modalità "(non risponde)". Qualche soluzione?
RispondiEliminagrazie, ha funzionato
RispondiEliminaha funzionato, grazie.
RispondiEliminaDopo svariati minuti dice che il file non risponde, cosa posso fare ?
RispondiEliminail file "non risponde" dopo diversi minuti, lascio fare o è inutile?
RispondiEliminaRiprova, se non risponde non lo sblocca
EliminaHo provato già svariate volte ma nulla, il file si blocca e non risponde e resta così. Ho provato entrambi i metodi, c'è altro che possa fare? Il foglio si apre ma ha delle celle bloccate.
EliminaChe sistema operativo hai e quale Office?
EliminaOffice 2013 su Windows 10 64 bit
RispondiEliminaProva a scaricare Office precedente. Lo trovi online. Poi sblocchi e disintalli
Eliminala versione 2010 va bene?
RispondiEliminaDirei di si
Eliminaok provo a faccio sapere, grazie!
RispondiEliminaIo uso Excel 2003, la protezione è stata impostata da opzioni protezione,quindi la cartella è bloccata non si riesce a fare nulla se non si mette la password, excel è bloccato non si riesce a fare tutte quelle operazioni richieste.
RispondiEliminaCordiali saluti Aldo 49
P.S. Non sono esperto.
Grazie sei un grande!!! Funziona perfettamente :)
RispondiEliminaGrazie a te
Eliminaottimo grazie, ha funzionato
RispondiEliminaio ho W10 con Excel 2019 e non riesco a sbloccarlo in nessun modo. Prima fino a fine Dicembre era diverso anche il foglio di lavoro e lo sbloccavo con il primo metodo elencato, adesso e cambiata la grafica ma non riesco a sbloccarlo. Qualche soluzione? Grazie.
RispondiElimina