Proteccion de celdas

hola, Maverick !

... quiero proteger las celdas ... para que no la puedan tocar los usuarios como hago en el Xp
... en este del trabajo que es el 2000 no puedo pues no encuentro la opcion.
... pasos a seguir para hacerlo es que me es muy urgente y estoy parado.

el [nuevo] metodo de proteccion de xp incluye caracteristicas que ...
[obviamente] NO estan 'soportadas' en las versiones 'anteriores' :((
se podria hacer una 'simulacion' por codigo :))

¿cual/es caracteristica/s [del xp] necesitas 'aplicar' [en 2000]???

saludos,
hector.

Hola yo lo que necesito es en una hoja en la cual voy a poner unas formulas
en alguna celda determinada, estas estén protegidas para que los usuarios
no puedan modificarlas ellos metan los datos necesarios en las celdas que si
pueden modificar y los resultados de las formulas aunque los puedan ver no
modificar
no se si me explico bien

gracias por tu ayuda


"Héctor Miguel" escribió en el mensaje
news:

hola, Maverick !

> ... quiero proteger las celdas ... para que no la puedan tocar los

usuarios como hago en el Xp

> ... en este del trabajo que es el 2000 no puedo pues no encuentro la

opcion.

> ... pasos a seguir para hacerlo es que me es muy urgente y estoy parado.

el [nuevo] metodo de proteccion de xp incluye caracteristicas que ...
[obviamente] NO estan 'soportadas' en las versiones 'anteriores' :((
se podria hacer una 'simulacion' por codigo :))

¿cual/es caracteristica/s [del xp] necesitas 'aplicar' [en 2000]???

saludos,
hector.

hola, Maverick !

... necesito ... poner unas formulas ... celda determinada ... protegidas ... usuarios no puedan modificarlas
... metan los datos ... en las ... que si pueden modificar y ... las formulas aunque los puedan ver no modificar
... no se si me explico bien

[aunque no lo dices] 'supongo' que introduces las formulas [en celdas protegidas] 'por codigo' [???]
suponiendo [tambien] que la proteccion de la hoja 'ya esta hecha' [manualmente o por codigo]
y que 'previamente' han quedado desbloqueadas las celdas que puede modificar el usuario ...
puedes usar el metodo 'protect' estableciendo en 'true' el argumento 'userinterfaceonly', con lo cual...
'lo que sea' que hagas 'por codigo' estara 'permitido' [salvo 'algunas' excepciones]
'ventajas' = NO es necesario 'repetir' el password :)) [p.e.]
en el modulo de codigo del libro 'ThisWorkbook' ==Private Sub Workbook_Open()
Worksheets("Hoja1").Protect UserInterfaceOnly:=True
End Sub

si se trata de 'varias' hojas, puedes modificar a lo siguiente:
Private Sub Workbook_Open()
Dim Hoja As Worksheet
For Each Hoja In Worksheets(Array("Hoja1", "Hoja3"))
Hoja.Protect UserInterfaceOnly:=True
Next
End Sub

saludos,
hector.

creo que esto se me complica un poco yo antes cuando una celda no quería que
por equivocación alguien la cambiara incluido yo mismo había una opción en
creo pulsando con el botón derecho sobre ella había una opción que era
proteger la celda de esta forma se evitaba que cuando estas introduciendo
datos por inercia y sin darte cuenta escribieras algo sobre una celda en la
cual había una formula y la borraras eso es lo que yo quiero hacer pero como
te comente en el 2000 no lo encuentro





"Héctor Miguel" escribió en el mensaje
news:

hola, Maverick !

> ... necesito ... poner unas formulas ... celda determinada ...

protegidas ... usuarios no puedan modificarlas

> ... metan los datos ... en las ... que si pueden modificar y ... las

formulas aunque los puedan ver no modificar

> ... no se si me explico bien

[aunque no lo dices] 'supongo' que introduces las formulas [en celdas

protegidas] 'por codigo' [???]

suponiendo [tambien] que la proteccion de la hoja 'ya esta hecha'

[manualmente o por codigo]

y que 'previamente' han quedado desbloqueadas las celdas que puede

modificar el usuario ...

puedes usar el metodo 'protect' estableciendo en 'true' el argumento

'userinterfaceonly', con lo cual...

'lo que sea' que hagas 'por codigo' estara 'permitido' [salvo 'algunas'

excepciones]

'ventajas' = NO es necesario 'repetir' el password :)) [p.e.]
en el modulo de codigo del libro 'ThisWorkbook' ==> Private Sub Workbook_Open()
Worksheets("Hoja1").Protect UserInterfaceOnly:=True
End Sub

si se trata de 'varias' hojas, puedes modificar a lo siguiente:
Private Sub Workbook_Open()
Dim Hoja As Worksheet
For Each Hoja In Worksheets(Array("Hoja1", "Hoja3"))
Hoja.Protect UserInterfaceOnly:=True
Next
End Sub

saludos,
hector.

Te hablo del Excel2000, por defecto todas las celdas están bloqueadas.

Cuando proteges una hoja, en las celdas que están bloqueadas, no se pueden
introducir datos.

Para cambiar una celda de bloqueada a no bloqueada o viceversa, tienes que
seleccionar la celda, y pinchar en Formato > Celda > Pestaña
protección. (Escribo de memoria, pero seguro que los comandos son esos o muy
parecidos)

SALUDOS
julian-valencia-españa