El post que buscas se encuentra eliminado, pero este también te puede interesar

quitar contraseñas a hojas de excel

COMO QUITAR CONTRASEÑAS A HOJAS DE EXCEL







<JoGaxD>


Saludos...
En esta oportunidad quiero compartir contigo un codigo de programacion en Visual Basic, que nos permitira desbloquear o quitar contraseñas de una hoja de excel.

Si alguna vez se nos presento este problema el cual no nos permitia realizar modificaciones a alguna hoja de excel, pues ahora aprenderas de manera rapida y sencilla la forma de desbloquer hojas de excel.

Te explicare paso a paso, con imagenes para que aprendas rapido...




En esta primera imagen que te muestro, nos aperece un cuadro de dialogo tipico de una hoja de excel bloqueda (con contraseña), ya que al intentar hacer alguna modificacion esta no es permitida.

quitar contraseñas a hojas de excel



Paso 1
Como primer paso activaremos la pestaña Programador para ello debemos hacer lo siguiente, ir al Boton de Office/Opciones de excel

jogaxd



Paso 2
Aparecera un menu como el que se muestra, en la parte superior del cuadro activamos la opcion Mostrar Ficha de Programador en la Cinta de Opciones y finalizaremos con Aceptar

quitar contraseñas a hojas de e



Paso 3
Como se muestra en la imagen al avtivar la opcion anterior nos aparecera la pestaña Programador, al aperecer la pestaña nos indica que estamos haciendo correctamente los pasos. xD!

desbloquear hoja de excel



Paso 4
Selecionamos la pestaña Programdor, nos ubicamos en el Icono Visual Basic tal como se muestra en la imagen

hacker para excel




Paso 5
Al hacer click aparecera una nueva ventana de Programacion, en esta ventana hacemos lo siguiente, ir a Insertar/Modulo
hack de contraseñas para excel



Paso 6
En la ventana que nos aparece vamos pegar el siguiente codigo de programacion en Visual Basic

Sub Quitar_contraseña()
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 "<JoGaxD>" & vbCr & "Se ha quitado la contraseña:" & vbCr & Contraseña
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub


Despues de copiar y pegar el codigo cerraremos la ventana de Programacion.

quitar contraseñas a hojas de excel



Paso 7
Luego vamos a la pestña Vista que se encuentra en la cinta de opciones, ahora ubicamos la ocion Macros/Ver macros
como se muestra en la imagen

jogaxd



Paso 8
Entonces parecera un cuadro como el que se muestra en la imagen, en el selecionamos la opcion, Quitar Contraseña y finalmente le damos Ejecutar

quitar contraseñas a hojas de e


Paso 9
Esperaremos un momento en el peor de los casos 1 min, despues de ello si hicimos todos los pasos correctamente aparecera una ventanita o un mensaje diciendo que la contraseña a sido desbloqueda, como se muestra en la imagen.

desbloquear hoja de excel





ESPERO TE SIRVA YA SABES QUE AGRADECER NO CUESTA NADA ... ES FACIL Y SENCILLO ... PUEDES DEJAR PUNTOS O COMENTARIOS.



SIGUEME EN FACEBOOK
AQUI PODRAS EN CONTRAR NUEVOS TUTORIALES, PROGRAMAS PARA LA Hp50G, ASI COMO SUS ACTUALIZACIONES Y NUEVOS PROGRAMAS.
http://www.facebook.com/JoGaxD






JoGaxD

José Gabriel Medina Gómez – scan_mg@hotmail.com

UNIVERSIDAD NACIONAL PEDRO RUIZ GALLO

CHICLAYO – PERU

Anuncios

31 comentarios - quitar contraseñas a hojas de excel

@Aquiles_Brinco
lo prometido es deuda: te dejo los 10 del dia y lo agrego a los favoritos
@Asutam5054 +2
+10 y mañana ya sos NFU
Te sigo para que sigas aportando cosas sobre ingenieria
@CONSTHURAG +1
Se agradece, me hacia falta. +10
@bonillapunk
Muy bien, excelente, me funcionó, PERO QUE PASA SI NO TE PERMITE AGREGAR "MODULOS"? te dejo puntos.
@mannymtz
Lo voy a revisar y te comento. Saludos
@jantil
Y, hay alguna otra forma de quitar contraseñas cuando esta no te permite insertar modulos en Visual Basic? Ahí como lo haces???
@SPARCO21
Lo maximo, me SIRVIO
@calypsorei
Eres lo máximo!!! Hazme un hijo!
@thor_laf
ecxelente .... hace mucho que lo intente y hoy por fin lo logre GRACIAS.
@davomx
Excelente mi estimado, te agradezco el dato. Sólo que despues de correr el archivo en varias pestañas, el archivo marca "Libro protegido" Tendrás algo para esto? Saludos.
@juka2409
no hay imagenes??... subelas por favor
@mdxxdiego
Gracias!!!! eres un capo me sirvió
@JacquesdeMolay
Gracias por evitarme el trabajo de hacer un catálogo de nuevo de cero!!!!!!! mil gracias!
Si estuvieras acá, te daría un abrazo loco! +10
@acm8pts
Genioooo!!
te la chuparia loco. +10 lince
@rorrow2k
Buen dia, a mi en cuanto le doy ejecutar ya no responde el Excel . . . . y lo tengo que cerrar con el admon de tareas