Tabla de contenido:

Código VBA para desbloquear una hoja de Excel bloqueada: 4 pasos
Código VBA para desbloquear una hoja de Excel bloqueada: 4 pasos

Video: Código VBA para desbloquear una hoja de Excel bloqueada: 4 pasos

Video: Código VBA para desbloquear una hoja de Excel bloqueada: 4 pasos
Video: Cómo desbloquear una hoja de Excel sin saber la contraseña? 2024, Noviembre
Anonim
Código VBA para desbloquear una hoja de Excel bloqueada
Código VBA para desbloquear una hoja de Excel bloqueada
Código VBA para desbloquear una hoja de Excel bloqueada
Código VBA para desbloquear una hoja de Excel bloqueada

Si alguna vez ha olvidado la contraseña de una de sus hojas de cálculo de Excel, sabe lo frustrante que puede ser. El código utilizado en esta instrucción es uno de los más simples que he encontrado. Generará un código utilizable que desbloqueará su hoja protegida. No puedo atribuirme el mérito del código, ya que simplemente lo encontré en un momento de necesidad (y ya no puedo encontrar dónde está el sitio) … así que no seré de mucha ayuda si no funciona para usted, pero he Tuve éxito con él y pensé en compartirlo.

Paso 1: Abra VBA

Abrir VBA
Abrir VBA

Abra la hoja de trabajo para la que olvidó su contraseña. Use Alt + F11 para ingresar al editor de macros. Una vez en VBA, haga doble clic en la hoja que necesita desbloquear de la lista del menú a la izquierda. Esto abrirá la página de declaraciones generales para la hoja.

Paso 2: Corta y pega el Code Breaker

Cortar y pegar el descifrador de códigos
Cortar y pegar el descifrador de códigos

Inserte el siguiente código en la página de declaraciones generales que ha abierto. No debería tener que cambiar nada, el nombre de la hoja, etc. Simplemente corte y pegue._ Sub PasswordBreaker () 'Rompe la protección de la contraseña de la hoja de trabajo. Dim i As Integer, j As Integer, k como IntegerDim l como entero, m como entero, n como entero Dim i1 como entero, i2 como entero, i3 como entero dim i4 como entero, i5 como entero, i6 como entero en caso de error Continuar siguiente para i = 65 a 66: para j = 65 a 66: para k = 65 a 66 para l = 65 a 66: para m = 65 a 66: para i1 = 65 a 66 para i2 = 65 a 66: para i3 = 65 a 66: para i4 = 65 A 66 Para i5 = 65 A 66: Para i6 = 65 A 66: Para n = 32 A 126 ActiveSheet Desproteger Chr (i) & Chr (j) & Chr (k) & _ Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & Chr (i3) & _Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) Si ActiveSheet. ProtectContents = False Entonces MsgBox "Una contraseña utilizable es" & 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 Si es Siguiente: Siguiente: Siguiente: Siguiente: Siguiente: Siguiente Siguiente: Siguiente: Siguiente: Siguiente: Siguiente: Siguiente Fin Sub_

Paso 3: Ejecute la macro

Ejecutar la macro
Ejecutar la macro

Una vez que se agrega el código, ejecute la macro seleccionando Ejecutar en la barra de pestañas del menú en la parte superior de la pantalla del editor de VBA o simplemente presione F5

Paso 4: use el código generado

Utilice el código generado
Utilice el código generado
Utilice el código generado
Utilice el código generado
Utilice el código generado
Utilice el código generado

La macro lo regresará a la hoja de trabajo que desea desproteger. Aparecerá un cuadro de estilo de alerta con un código utilizable. En la pestaña del menú Revisar haga clic en Desproteger hoja, ingrese el código generado como contraseña y listo. ¡Tu hoja debe estar desbloqueada! Debes usar este poder de manera inteligente y responsable solo para desbloquear tus propias hojas de trabajo.

Recomendado: