Niveles de Protección en EXCEL 97

18/10/2006 - 16:32 por Bart | Informe spam
Hola,

He notado que los niveles de protección entre Excel 97 y 2003, son muy
diferentes.

En Excel 97 se tienen menos opciones, sólo tres: Contenido, Objetos,
Escenarios.

Quisiera saber que alternativa se tiene en Excel 97 para OCULTAR las
fórmulas y EVITAR la escritura de determinadas CELDAS de una hoja, pero que
SI permita mediante una macro, pegar el contenido de una celda en otra y
darle un determinado formato.

He probado con las opciones de OCULTAR y BLOQUEAR celda, para luego proteger
la hoja, pero la MACRO de copiar y darle formato de fecha del contenido de
una celda en otra, me está generando error y se detiene.

Gracias...

B.S.
 

Leer las respuestas

#1 Héctor Miguel
18/10/2006 - 20:10 | Informe spam
hola, Bart !

He notado que los niveles de proteccion entre Excel 97 y 2003, son muy diferentes.
En Excel 97 se tienen menos opciones, solo tres: Contenido, Objetos, Escenarios.
Quisiera saber que alternativa se tiene en Excel 97 para OCULTAR las formulas
y EVITAR la escritura de determinadas CELDAS de una hoja
pero que SI permita mediante una macro, pegar el contenido de una celda en otra y darle un determinado formato.
He probado con las opciones de OCULTAR y BLOQUEAR celda, para luego proteger la hoja
pero la MACRO de copiar y darle formato de fecha del contenido de una celda en otra, me esta generando error y se detiene.



1) para que no 'se vean' las formulas, marca la opcion de 'oculta' a las celdas aplicables y proteges la hoja
2) si necesitas que la proteccion NO 'afecte' a tus macros ->SIN tener que [des/re]proteger la hoja<-
[asumiendo que la hoja ya esta protegida]... puedes usar la instruccion de 'solo interfase de usuario'

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

ejemplos protegiendo la hoja al abrirse el libro sin que les afecte modificarlas por codigo...

a) en excel 97 y 2000 NO necesitas 'repetir' el password <= es 'suficiente' con poner:
en el modulo de codigo del libro ==Private Sub Workbook_Open()
Worksheets("Hoja1").Protect UserInterfaceOnly:=True
End Sub

b) a partir de excel 2002 [xp] SI es requisito 'repetir' el password :-( < en el modulo de codigo del libro ==Private Sub Workbook_Open()
Worksheets("Hoja1").Protect _
PassWord:="la MISMA cOntRaSe#a qUe lE pUsISte", _
UserInterfaceOnly:=True
End Sub

c) si se trata de varias hojas [supoiendo una misma clave para todas]...
en el modulo de codigo del objeto ThisWorkbook de tu libro [prueba data.xls] ==Private Sub Workbook_Open()
Dim Hoja As Worksheet
For Each Hoja In Worksheets(Array("hoja1", "hoja4", "hoja6"))
Hoja.Protect PassWord:="123", UserInterfaceOnly:=True
Next
End Sub

[practicamente] TODO lo que 'hagas por codigo'... pasara 'sin problemas'
[excepto 'ciertas' cosillas relacionadas con insertar filas/columnas y objetos incrustados] :-((

Preguntas similares