Preteger SOLO las Hojas según su nombre en el ImputBox

Con este código o otro

ImputBox que pregunte:

1ª- Pregunta; "¿Que hojas quier proteger"? Aceptar y

2ª- Pregunta; "¿Con que clave hacer la proteccion?

PrivateFunctionDesproteger(ByValhj AsExcel.Worksheet)AsBoolean
'MsgBox Err.Number
Err.Number = 0
On Error Resume Next
hj.Unprotect Password:="123"
Desproteger = Not VBA.CBool(Err.Number)
'MsgBoxErr.Number
OnErrorGoTo0
EndFunction

Aceptar y proceder a la propteccion de las hojas mensinadas en la 1ª pregunta y clave de la 2ª

1 Respuesta

Respuesta
1

No sería más practico si se muestra la hoja con un mensaje y que pregunte si quiere o no proteger la hoja, ¿por qué si escribe en el inputbox el nombre de la hoja y lo escribe mal?

¿Se va a poner un solo inputbox para que pongan todas las hojas?

Podría ser si el ImputBox lo permite meterle la o las hojas(todas las que quier proteger) a Proteger pero y ¿para darle la clave? ¿seria otro ImputBox no?

O si ya la macro contiene la clave se ahorra un ImputBox.

Podría ser con la clave en la macro de una ves.

Te envíe un mail sobre la modificación del modulo para Limpiar

Te envié un ejemplo para bloquear hojas.

Saludos. Dam
Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Proteger y Desproteger muchas hojas a la vez

Me gustaría saber si hay alguna forma de proteger muchas hojas a la vez sin tener que ir una a una (claramente no hablo de proteger el libro). Lo que he logrado las protege sin "clave", por lo que desprotegerlas es inmediato también. No sirve. De...
1 respuesta

Validar una macro para que me pida contraseña de desprotección de hoja

Tengo una base de datos en excel 2000 (no puedo instalar otra versión más actualizada, ya que corresponde a un archivo de trabajo) y necesité proteger la hoja. En principio cree una macro para proteger la hoja automáticamente al abrir el archivo y...
1 respuesta

Copiar en celdas de una hoja protegida

Tengo una macro que copia a otra hoja donde llevo un registro, cuando bloqueo con clave la hoja usando proteger hoja de exel la macro no funciona es decir no me copia los rangos. ¿Qué puedo hacer? Para que el usuario de la hoja 1 no pueda modificar...
1 respuesta

Macros Excel: Autofiltros en hojas protegidas

Necesito proteger muchas hojas a la vez, para eso uso este macro que saqué hace tiempo de esta página: Sub Proteger() Dim Psw As String Do While Psw = "" Psw = Trim(InputBox("Escribe la contraseña para Proteger las hojas")) Loop For Each ws In...
1 respuesta

Proteger hojas de excel con macros

Mi problema es como puedo desproteger y proteger una hoja de excel automáticamente con una macro cuando esta se ejecute y realice una tarea, ya lo hice de una forma la protege pero no permite asignarle valores a la contraseña, lo que quiero es poner...
2 respuestas

Bloquear hojas de excel. VBA

Es posible bloquear las hojas de excel mediante un código en Visual Basic para que no se puedan digitar datos en estas, directamente... Pero si poder ingresar la información mediante UserForm, ¿Y qué al darle en un botón llamado "GUARDAR" me copie...
1 respuesta

Macro para llenado es formato en excel

Sé que existe la forma de "saltar" de una celda a otra, con el tabulador, de un formato en excel donde solamente vayas a llenar datos (como una plantilla o machote)pero no sé desarrollar la macro, ¿Cómo debo hacerlo? Víctor
1 respuesta