Proteger una hoja con el valor de una celda

Hola experto!
Se podrá proteger una hoja mediante un input box, osea que me pregunte cual contraseña le quiero poner a la hoja, y que se proteja con la contraseña dada.
Y otro input box que me pregunte que si quiero cambiar la contraseña de la hoja protegida, y que la cambie por la que yo le indique.
Gracias

1 Respuesta

Respuesta
1
Para Porteger la hoja y guardar la clave en la celda a1
clave = InputBox(Ponga la contraseña")
Range("a1").value = Clave
ActiveSheet. Protect clave
Para cambiar la clave
a = inputBox("Ponga la nueva contraseña")
Range("a1").value = a
Saludos
Más Información en

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas