Solo consultar tabla

15/01/2005 - 18:04 por Juani | Informe spam
He terminado una tabla, algo muy sencillo, con una serie
de datos que interesa que puedan verlo los trabajadores
de la empresa pero no modificar ninguno de sus campos,
sin embargo si quieren añadir alguno nuevo, no habría
problema ¿Es posible esto? Supongamos que las celdas A1
hasta A20 y b1 hasta B20 no se pueden utilizar pero si
podían seguir escribendo en la A21 y B21.
Gracias
Juani
 

Leer las respuestas

#1 Ignacio Pérez
15/01/2005 - 18:43 | Informe spam
Hola Juani:
A continuacion te pongo el codigo de VBA necesario(no se puede hacer de otra
forma) para hacer lo que quieres. Estos son los pasos:
1-Todas las celdas de las columnas A y B deben estar desbloqueadas,
exceptuando los titulos de las columnas.
2-Protege la hoja con un Password.
3-Haces click sobre la etiketa de la hoja afectada y seleccionas "Ver
codigo", pegas el texto de abajo.
4-Sustituye dentro de este texto "TuPassword" por tu verdadero password(has
de dejar las comillas) !Esta repetido 3 veces¡.

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect Password:="TuPassword"
If Not Intersect(Range("A:B"), Target) Is Nothing Then
'Las dos proximas lineas son opcionales a efectos de corregir si hay algun
error
Respuesta = MsgBox("¿Estas seguro?", vbYesNo, "Verificar")
If Respuesta = vbNo Then
Target.Select
ActiveSheet.Protect Password:="TuPassword"
Exit Sub
End If
Target.Locked = True
End If
ActiveSheet.Protect Password:="TuPassword"
End Sub

Ante cualquier duda pregunta
Un saludo.

"Juani" escribió en el mensaje
news:1b0c01c4fb24$44218b60$
He terminado una tabla, algo muy sencillo, con una serie
de datos que interesa que puedan verlo los trabajadores
de la empresa pero no modificar ninguno de sus campos,
sin embargo si quieren añadir alguno nuevo, no habría
problema ¿Es posible esto? Supongamos que las celdas A1
hasta A20 y b1 hasta B20 no se pueden utilizar pero si
podían seguir escribendo en la A21 y B21.
Gracias
Juani

Preguntas similares