Macro en excel para proteger hojas y/o libro

Las instrucciones posteriores a:
Range("A1").Select
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
De manera que se pueda inclir el password predeterminado.

1 Respuesta

Respuesta
1
Dim Pass As String
Pass = InputBox("Escriba la Contraseña para proteger la Hoja")
   ActiveSheet.Protect Password:=Pass, DrawingObjects:=True, Contents:=True, Scenarios:=True
o en lugar del inputbox, pon una contraseña entre comillas ""

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas