colocar contraseñas individuales a culumnas especificas

11/08/2006 - 01:06 por rokie programer | Informe spam
hola a todos.

mi problema es el siguiente: tengo una base de datos en excel y es
compartido con distintos usuarios (al menos 5) ; estos hacen
modificaciones al archivo de la siguiente manera:

usuario 1 modifica las colmnas A a D
usuario 2 modifica las columnas E a J
usuario 3 modifica las columnas K a O

y asi sucesivamente. Mi necesidad es anular la modificacion de columnas
que no sean de propias de cada usuario ( por ejemplo que usuario 1 no
pueda modificar las columnas del usuario 3 sin que el programa pida una
autentificacion por contraseña), para ello requiero colocar una
contraseña a las columnas para que el respectivo usuario pueda
modificarlas. Me podran ayudar a ejecutar alguna macro o algun software
para realizar esta tarea?

Gracias de antemano.
 

Leer las respuestas

#1 Héctor Miguel
11/08/2006 - 04:39 | Informe spam
hola, ?

... tengo una base de datos... compartido con distintos usuarios (al menos 5)
estos hacen modificaciones al archivo de la siguiente manera:
usuario 1 modifica las colmnas A a D
usuario 2 modifica las columnas E a J
usuario 3 modifica las columnas K a O
y asi sucesivamente.
... anular la modificacion de columnas que no sean de propias de cada usuario
... que usuario 1 no pueda modificar las columnas del usuario 3
... sin que el programa pida una autentificacion por contrase#a) [...]



si el libro esta guardado 'efectivamente' como libro compartido... toma en cuenta lo siguiente:

1) los libros compartidos tienen algunas 'restricciones' [p.e.]
a) no se puede andar des/re/protegiendo hojas, libro, etc. etc. etc.
b) no se puede ver/modificar/... el proyecto de macros
c) algunas otras mas :))
-> a menos que lo quites de compartido [perdiendo el historial de cambios si lo hubiera] -?-

2) para tal caso, una -probable- alternativa es restringir el area de movimientos al momento de abrirse el libro [p.e.]
copia pega las siguientes lineas en el modulo de codigo del libro [ThisWorkbook]
y... no olvides que no se podra manipular el proyecto de macros... mientras este como comprtido...

Private Sub Workbook_Open()
With Worksheets("hoja1")
Select Case InputBox("Indica por favor tu clave de usuario.", "OBLIGATORIO !!!")
Case "UsUariO 1"
.ScrollArea = "a:d"
Case "usuario 2"
.ScrollArea = "e:j"
Case "uSuAriO 3"
.ScrollArea = "k:o"
' otros Case como sean necesarios... '
Case Else
MsgBox "Cerrando el libro por faltas a la moral :))"
End Select
End With
End Sub

nota que la clave que se introduzca debera ser EXACTA a la que esta 'comparndo' el codigo
y... si no quieres que 'se vea' [en un inputbox]... habra que adaptar un userform con -solo- un control textbox, y... [etc.]

3) si efectivamente requieres que un usuario pueda intervenir en las columnas de otro [previa clave de autorizacion]...
es necesario buscar otros procedimientos [que sean 'permitidos' para las macros de libros compartidos] ;)

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

Preguntas similares