Proteger hoja y deshabilita celdas bloqueadas

Hola nuevamente amigos. Necesito de su ayuda: Tengo una hoja la cual PROTEJO con una macros la cual me desproteje-ejecuta una suma-protege con el siguiente código:
ActiveSheet.Unprotect "mipassword"
ActiveSheet.Range("B5").Value = ActiveSheet.Range("B5").Value + 1
ActiveSheet.Protect "mipassword"
El problema que tengo es necesito activar solamente "SELECCIONAR LAS CELDAS DESBLOQUEADAS" pero cuando ejecuto mi macros también activa "SELECCIONAR CELDAS BLOQUEADAS" y no lo necesito por que ingreso datos en celdas especificas cuando doy enter.
Espero ser claro en mi solicitud, y gracias por su ayuda
Saludos

1 Respuesta

Respuesta
1
Si la 1ra vez, manualmente, la protejés sin tildar la opción de seleccionar celdas bloqueadas, cuando ejecutes tu instrucción alcanza.
Para asegurarte, podes agregar la siguiente instrucción:
ActiveSheet. Protect "password"
    ActiveSheet.EnableSelection = xlUnlockedCells
Gracias Elsa... ha funcionado a perfección.
Perdón por duplicar la pregunta pensé que no había sido publicada. Cerrare esta para continuar mis dudas en la otra.
Saludos,
Allgo

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas