Elimina la Protección de un archivo Excel

En muchos de mis casos he recibido, muchos comentarios de Los profesionales y estudiantes saben lo complicado que puede ser tener que editar un documento de Excel y no poder hacerlo. SI además tenemos que entregar una tarea o trabajo a tiempo el asunto se hace aún más cuesta arriba. Es posible que tengas la clave y nos sepas como hacer el desbloqueo. Ahora bien, incluso si no dispones de ese código de seguridad podrás acceder a ese documento y modificarlo si así lo necesitas. Precisamente, en este post te enseñaremos algunos trucos para quitar contraseña archivo excel 2020,2019,2017,2016, 2013,2010, 2007, 2003… En esta publicacion se le va a mostrar como desbloquear un archivo Excel en dos formas diferente: 
 Opcion 1
 

Sub breakit() 


Dim i As Integer, j As Integer, k As Integer 

Dim l As Integer, m As Integer, n 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 "One usable password is " & Chr(i) & Chr(j) & _ 

Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) _ 

& Chr(i4) & Chr(i5) & Chr(i6) & Chr(n) 

Exit Sub 

End If 

Next 

Next 

Next 

Next 

Next 

Next 

Next 

Next 

Next 

Next 

Next 

Next 


End Sub 

Guardas y despues ejecutas el macro ( flechita de play en el VB ) 

espera uno rato y te aparece un cartel con la clave interna de exel y en la opcion desprotejer hoja pones la clave y listo =)

 
 Opcion2
 
sheetProtection


facebook

Related Posts Plugin for WordPress, Blogger...