Sbloccare file Excel protetti con password

1. Aprite il file Excel visualizzate il foglio bloccato.
2. Premete sulla tastiera Alt+F11 o visualizza Macro per aprire l’editor VBA
3. Nello spazio bianco alla vostra destra incollate il codice che trovate qui di seguito otterrete così la password del foglio di Excel.

Sub SbloccaFogliExcel() ‘Sblocca i fogli Excel bloccati da password. 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. BY Networkingsolutions !!!” Exit Sub End If Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next End Sub