Al proteger por VB no bloquea ???

10/11/2005 - 00:02 por Javichu | Informe spam
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

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
12/11/2005 - 11:58 | Informe spam
hola, Javichu !

Tengo un codigo que funciona perfectamente salvo por una cosa.
Cuando yo, bloqueo manualmente una hoja e introduzco una password
le 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").Range _
("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 codigo, la hoja esta bloqueada... pero SI se pueden seleccionar las celdas BLOQUEADAS???
No hay ninguna opcion, la cual solo deje seleccionar las celdas DESBLOQUEADAS??



1) [hasta donde se]... la 'primera vez' que una hoja se protege [ya sea por codigo o por la interfase del usuario]...
NO tiene 'habilitada' la opcion para 'prohibir' la seleccion de celdas bloqueadas :-(
2) una vez que 'esta' caracteristica se ha establecido [quitando la marca a la opcion de celdas 'bloqueadas']...
SIGUE estando 'operable' con cada des/re/proteccion a esa hoja :))
3) si la 'primera' vez ocurre por codigo... -> ANTES de establecer la proteccion... -> usa la siguiente instruccion:
Worksheets("nombre de la hoja").EnableSelection = xlUnlockedCells
[seguida de la instruccion que le pone el password]
-> [obviamente] las celdas 'permitidas' [o desbloqueadas] ya debieron haberse establecido ;)

saludos,
hector.
Respuesta Responder a este mensaje
#2 Javichu
13/11/2005 - 23:15 | Informe spam
Eres un genio Hector...Gracia

Javich
Javichu's Profile: http://www.msusenet.com/member.php?useridB9
View this thread: http://www.msusenet.com/t-187117771
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida