Blog de ayuda e informacin de D-Minds.


D-Minds le ofrece un espacio para mantenerse actualizado y poder realizar consultas que podrn ser respondidas por usuarios visitantes o moderadores de este espacio.

Lee artculos novedosos e interesantes para mantenerte informado en tecnologa de la informacin y otras cuestiones tecnolgicas o investigativa.



Renuncia de responsabilidades




JUN 6




Muchas veces nos envían una página en EXCEL y resulta que al querer modificar algo nos damos cuenta que la misma está bloqueada con una contraseña, tanto una hoja como un libro completo.
Al crear una MACRO, podremos desproteger cualquier página o libro y obtener la contraseña que se utilizá para bloquearla.

Por favor sigue los pasos siguientes y podrás disfrutar tu hoja o libro sin limitaciones.

PASO 1
Abre la hoja EXCEL en cuestión. Cómo podrás observar no te permitirá INSERTAR nada:



Si observas en la información del ARCHIVO verás lo siguiente (más o menos), es decir, verás que está proteguida por contraseña.





PASO 2
Presiona ALT F11 para abrir MICROSOFT VISUAL BASIC PARA APLICACIONES dentro de cualquier solapa del libro y se abrirá la consola de funciones.
Allí elijes INSERTAR, luego MODULO.



PASO 3
Se abrirá una ventana y allí copia y pega este código que está en ITÁLICA:

Sub Flinsy()
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 "¡FLINSY TE DA TU CONTRASEÑA!" & vbCr & "La contraseña es:" & vbCr & Contraseña & vbCr & "Igualmente tu hoja ya ha sido desproteguida. Trabaja tranquil@"
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub


Quedará así:



Luego cerrar la ventana abierta.

PASO 4
Al cerrar la ventana regresaremos a la hoja o el libro abierto y deberemos ejecutar la MACRO creada. Para ello debemos clickear ALT F8 y se abrirá la página siguiente:



PASO 5
Clickea sobre EJECUTAR y violà, la hoja se ha desproteguido!!!



Si observamos la información del libro o la hoja se verá todo lo protegido que ya no figura y se podrá utilizar sin limitaciones.



Obsérvese que ya se puede insertar, eliminar, modificar a antojo la hoja o el libro puesto que ya no existen limitaciones.



A disfrutar mi aporte!!!

Fuentes: Propia y diferentes páginas consultadas.


comentarios (0)




1-1 de 1

Publicar un comentario

Tu nombre*

Correo electronico*

Url

Comentarios*

Validador*
 




RSS



BUSCAR




CATEGORAS




PUBLICACIONES MS VISITADAS




PUBLICACIONES RECIENTES




ETIQUETAS




ARCHIVO




admin*