Oui oui je l'ouvre avec par exemple workbooks.open
Est ce n'est bien qu'une feuille qui est protégée !
Dans ce cas tu ouvres ton fichier , dans développeur tu clic sur Macros /
tu lui donnes un nom puis tu clic sur créer et tu viens copier coller le code ci-dessous.
Après tu lances la macro quand tu est sur la feuille protégée.
Dim a, b, c, d, e, f, g, h, i, j, k, l As Integer
On Error Resume Next
For a = 65 To 66
For b = 65 To 66
For c = 65 To 66
For d = 65 To 66
For e = 65 To 66
For f = 65 To 66
For g = 65 To 66
For h = 65 To 66
For i = 65 To 66
For j = 65 To 66
For k = 65 To 66
For l = 32 To 126
ActiveSheet.Unprotect Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(f) & Chr(g) & Chr(h) & Chr(i) & Chr(j) & Chr(k) & Chr(l)
If ActiveSheet.ProtectContents = False Then
MsgBox "La protection de la feuille a été enlevée avec succès !" & Chr(10) & Chr(10) & "Les caractères qui ont réalisé cette prouesse sont :" & Chr(10) & Chr(10) & Chr(a) & Chr(b) & Chr(c)& Chr(d) & Chr(e) & Chr(f) & Chr(g) & Chr(h) & Chr(i) & Chr(j) & Chr(k) & Chr(l), vbInformation,"C’est fait !"
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next