Bloqueando hojas

25/09/2003 - 16:02 por Javier Avila | Informe spam
Hola a todos:
Quiero saber como bloquear una hoja de excel pero solo ciertas
caracteriscticas, ya que con la forma:

ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True, Password:="macropwd"

Se logra un bloqueo completo a excepcion de las celdas que deje
"desbloqueadas" que serian en la que quiero trabajar. Como lo que estoy
haciendo son reportes diarios de caja, tengo el problema que a veces
tengo demasiadas entradas y las 30 que tengo no abastecen, entonces hay
que insertar filas, dado que la hoja está bloqueada, no puedo insertar
filas a no ser que manualmente la bloquée y seleccione:
X Seleccionar celdas bloqueadas
X Seleccionar celdas desbloqueadas
X Insertar Filas

Existe alguna combinacion en VBA de comandos para lograr ese "mix" de
bloqueo?, gracias

Javier Avila
System Adminsitrator

LEYES DE ATHENA DE LA CORTESÍA AL VOLANTE. Si permite que alguien se
ponga delante de usted: 1. El coche de delante será el último en
atravesar un paso a nivel y usted se quedará sin poder moverse hasta que
termine de pasar un tren largo y lento; o 2. Los dos irán al mismo sitio
y el otro ocupará la última plaza de aparcamiento libre.
 

Leer las respuestas

#1 Héctor Miguel
27/09/2003 - 05:07 | Informe spam
Hola, Javier !

... bloquear ... hoja ... solo ciertas caracteristicas, ya que con la forma:
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="macropwd"
... bloqueo completo a excepcion de las celdas que deje "desbloqueadas" [...]
... reportes ... que a veces tengo ... que insertar filas ... no puedo ... a no ser que manualmente ... seleccione:
X Seleccionar celdas bloqueadas
X Seleccionar celdas desbloqueadas
X Insertar Filas
... alguna combinacion en VBA de comandos para lograr ese "mix" de bloqueo? [...]



==> estas usando [solo] los argumentos del metodo 'Protect' de las versiones 'anteriores' [en Excel-XP] <= las opciones que 'necesitas' [tambien] son parte de los argumentos del 'nuevo' metodo [en XP]
['tomado' de la ayuda {F1} en VBA de XP]
expresion.Protect _
Password, _
DrawingObjects, _
Contents, _
Scenarios, _
UserInterfaceOnly, _
AllowFormattingCells, _
AllowFormattingColumns, _
AllowFormattingRows, _
AllowInsertingColumns, _
AllowInsertingRows, _
AllowInsertingHyperlinks, _
AllowDeletingColumns, _
AllowDeletingRows, _
AllowSorting, _
AllowFiltering, _
AllowUsingPivotTables
_______
Saludos,
Héctor.
MS-MVP

Preguntas similares