Al proteger por VB no bloquea ???

Hola de nuevo!
Tengo un código que funciona perfectamente salvo por una cosa.
Cuando yo, bloqueo manualmente una hoja e introduzco una password, l
permito a los usuarios SOLAMENTE seleccionar celdas DESBLOQUEADAS.

Private Sub CommandButton2_Click()
Hoja1.Unprotect ("1234")
Range( _

"A2:J3,L2:M3,B5:M5,B10,B11,B12,A14:M19,C39,C40,B42,B43,C61,C62,C63,C64,C65,C74,C75,C76,C77,C78,C79
_
).ClearContents
Hoja1.Protect ("1234")
Hoja11.Unprotect ("12345")
Worksheets("Recortes").Rang
_("k2,k4,k9,k11,c16,c18,g16,g18,k16,k18,r2,r4,r9,r11,r16,r18").ClearContents
Hoja11.Protect ("12345")
Range("A2:J3").Select
End Sub

¿Porque una vez ejecutado el anterior código, la hoja está bloquead
con la misma password, pero SI se pueden seleccionar las celda
BLOQUEADAS???

¿No hay ninguna opcion, la cual solo deje seleccionar las celda
DESBLOQUEADAS??

Gracias de nuevo por vuestro tiempo y por vuestra colaboración.
Saludos

Javich
Javichu's Profile: http://www.msusenet.com/member.php?useridB9
View this thread: http://www.msusenet.com/t-187117771