-->
Editado el: 17/3/2014
¿Te ha pasado que el anterior empleado dejó una planilla de Excel que hacía varios cálculos, pero la hoja está bloqueada con contraseña? Seguramente has tratado de adivinarla, incluso de contactar a esa persona para poder usar tu tan preciado formato y no tener que hacerlo todo de nuevo.
Sin embargo, existe una solución al alcance de todos. No es necesario invertir dinero en un programa especializado para poder recuperar el control de tu archivo.
Con estos 8 pasos podrás desbloquear tu archivo hoja en 5 minutos (o menos)
[aviso titulo=“Nota Importante:” tipo=“yellow”]Lo que te explico en esta entrada solo te sirve para desbloquear HOJAS que están protegidas con contraseña. Para desbloquear LIBROS o ARCHIVOS que están bloqueados, deberás usar otra solución.[/aviso]
A continuación te dejo el código que debes pegar en la ventana del editor de Visual Basic. Cópialo tal cual lo tienes dentro del siguiente recuadro y pégalo donde corresponde, siguiendo las instrucciones.
Option Explicit
Sub DesbloquearHoja()
Dim Contrasenia As String 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
Contrasenia = 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 Contrasenia If ActiveSheet.ProtectContents = False Then MsgBox “¡Lo he logrado!” & vbCr & _ “La Contraseña es:” & vbCr & Contrasenia Exit Sub End If Next: Next: Next: Next: Next: Next Next: Next: Next: Next: Next: Next
End Sub
Ahora que ya sabes el secreto, haz el bien. Que esto te sirva también para que hagas conciencia del nivel de seguridad que te da un sencillo bloqueo a nivel de hoja.
Generalmente, este tipo de protección la debemos destinar para uso interno de la empresa, como por ejemplo enviar listados, informes, requisiciones, etc. donde la seguridad no juega un papel crítico.
[aviso titulo=“Nota:” tipo=“yellow”]La finalidad de la protección a nivel de hoja, es evitar las alteraciones por acciones involuntarias del usuario. En ningún momento debe considerarse una medida de seguridad propiamente dicha ya que, como has visto, cualquiera puede saltarse esta protección.[/aviso]
Yo ya he contado mi parte, ahora te toca a ti. Cuéntame acerca de tu experiencia con los bloqueos a nivel de hoja en Excel. ¿Ya has usado antes esta técnica?
Seguramente has pasado alguna vez por esta situación y tu experiencia enriquecería la conversación.
¡Nos vemos!
[firma]
[tiny_coffee]