Gane dinero llenando encuestas

martes, 22 de octubre de 2013

Desbloquear hojas de calculo


Algunas veces bloqueamos las hojas de cálculo de Excel,  pero al pasar del tiempo no  nos acortáramos de la clave que ingresamos previamente y nos encontramos con esto. Un letrero con el mensaje que dice la celda está bloqueada.

Ahora les mostrare como desbloquear estas celdas utilizando con código que viene incorporado por VBA, no mejor con una macro.
Nos paramos en la hoja que queremos desbloquear y damos AlT+F11, para abrir el editor de VBA.  Escribimos este código que les dejare en la descripción.


Le damos al botón de Play y esperamos que el código nos desbloquee la hoja de cálculo.

Debe aparecer este mensaje y listo.  Ya está la hoja desbloqueada.

Solicita el ejemplo rellenando el Formula en la parte baja del Block, si este es de ayuda para ti suscribete a nuestro canal de youtube. 
 
Con tu suscripción colaboras para que subamos mas videos a youtube de misma importancia.

Suscribete primero al canal youtube y despues te llegara el ejemplo totalmente gratis. Con tu suscripción colaboraras para que subamos mas videos a youtube.




6 comentarios:

  1. no veo el código por ningún lado y ya me suscribí al canal

    ResponderEliminar
  2. Saludo,

    Mira el codigo.

    Sub breakit()

    Dim i As Integer, j As Integer, k As Integer
    Dim l As Integer, m As Integer, n As Integer

    On Error Resume Next
    For i = 65 To 66
    For j = 65 To 66
    For k = 65 To 66
    For l = 65 To 66
    For m = 65 To 66
    For i1 = 65 To 66
    For i2 = 65 To 66
    For i3 = 65 To 66
    For i4 = 65 To 66
    For i5 = 65 To 66
    For i6 = 65 To 66
    For n = 32 To 126

    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
    Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
    Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

    If ActiveSheet.ProtectContents = False Then
    MsgBox "El password 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 If
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next
    Next

    Next
    Next

    End Sub

    ResponderEliminar
    Respuestas
    1. saludos
      ese codigo esta diferente que el que usas en el video, como busco el mismo que usaste en el video

      Eliminar
  3. hola buenas tardes ,ya me suscribí y rellene el formulario y aun no veo el código . podrías indicarme como podría obtenerlo.

    ResponderEliminar