Ver originales (Francés)

Quitar protección de varias hojas (aquí 150)

Resuelto
noila59216 Mensajes publicados 34 Estado Miembro -  
noila59216 Mensajes publicados 34 Estado Miembro -
Hola,
¿es posible quitar la protección de 150 hojas de una sola vez???? Ya tengo algunas que han sido desprotegidas, pero no todas.... gracias por tu ayuda

Configuración: Windows / Chrome 53.0.2785.116

2 respuestas

  1.
    titeufdu89 Mensajes publicados 387 Estado Miembro 38
     
    Hola Noila,

    Copia el siguiente código en un módulo de tu archivo y ejecuta la macro desde "Macro" en la pestaña "Desarrollador", quitará la protección de cada una de las hojas de tu libro. 

    Sub desproteger() Dim ws As Worksheet For i = 1 To Worksheets.Count Set ws = Worksheets(i) ws.Unprotect Next i End Sub


    Buen día

    Jc
    1
    1. titeufdu89 Mensajes publicados 387 Estado Miembro 38
       
      Pequeña aclaración, una vez que un libro contiene macros (automatización), es conveniente guardar el libro en formato XLSM (que admite macros), así que guarda tu libro en el formato correcto para poder utilizar esta macro.

      Jc
      0
    2. noila59216 Mensajes publicados 34 Estado Miembro
       
      ¡Graciaaaaaas
      Lo haré mañana.....!
      0
    3. noila59216 Mensajes publicados 34 Estado Miembro
       
      ¡Sí, funciona... espero que pueda hacerlo de nuevo en el futuro!
      0