(506) 8864 3136 lsalazar@hyl.co.cr

Macro Desbloquear Hoja en Excel

Dado que muchas veces podemos olvidar la contraseña de la hoja en la que estamos trabajando, acá les mostraremos como poder desbloquearla.

Paso1: Acá puedes dirigirte a la cejilla Vista y luego a Macros, o bien con las teclas Alt+F8:

Paso2: Una vez que se despliegue la pantalla Macros, acá solo debemos digitar en la sección Nombre de la Macro, el nombre que queramos, en este caso, digitaremos «Macro», seguidamente debemos darle click al botón «Crear»:

Paso 3: Una vez que se nos abra esta hoja:

Solo debemos pegar los siguiente:

Dim a As Integer, b As Integer, c As Integer
Dim d As Integer, e As Integer, f As Integer
Dim a1 As Integer, a2 As Integer, a3 As Integer
Dim a4 As Integer, a5 As Integer, a6 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 a1 = 65 To 66
For a2 = 65 To 66: For a3 = 65 To 66: For a4 = 65 To 66
For a5 = 65 To 66: For a6 = 65 To 66: For f = 32 To 126
Contraseña = Chr(a) & Chr(b) & Chr(c) & Chr(d) & Chr(e) & Chr(a1) _
& Chr(a2) & Chr(a3) & Chr(a4) & Chr(a5) & Chr(a6) & Chr(f)
ActiveSheet.Unprotect Contraseña
If ActiveSheet.ProtectContents = False Then
MsgBox «¡Listo!» & vbCr & «La Hoja ha sido desbloqueada:» & vbCr & Contraseña
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next

 

y debe quedar de tal manera, luego solo le damos click en el botón guardar y volvemos a ir a Macros (Alt+F8) y seleccionamos la macro que creamos y le damos «Ejecutar»

Una vez que aparezca el mensaje, ya la hoja ha sido desbloqueada y podemos continuar con nuestro trabajo, es importante tener en cuenta que no es ético desbloquear hojas creadas por terceros.

 

Volver atrás