Vuelvo a intentarlo

Ahora si que me quedo sorprendida, quizás sea culpa mía por no saber mirar en
el lugar oportuno, pero hice lo mismo que estoy haciendo ahora. Vuelvo a
revisar desde mi ordenador la primera exposición que hice y no logro
encontrar la respuesta en ningún sitio

Desde luego si he molestado a alguien no ha sido con intención y pido
disculpas por ello. En este foro he logrado encontrar soluciones que sin la
gente que tanto sabe me hubiera sido mu difícil encontrarlas.

Así que espero que "AnSanVal" no me lo tenga en cuenta que aquí estoy para
seguir sus indicaciones, vuelvo a disculparme contigo´

... Y para tí "Principiante" un saludo también, habeís conseguido dejarme
desconcertada

"Principiante" escribió:

Ups!!
Si te contestaron ..

"María" escribió en el mensaje
news:
> Bueno AnSanVal aunque seas chicharrero y yo escriba de la isla vecina (Las
> Palmas de Gran Canaria) no por ello iba a despreciar tu contestación.
> Bien si vas a la página 3 y ves en la pregunta de distintas claves para
> distintas usuarios del día 27-02-07 sólo hay una exposición y ninguna
> contestación, quizás contestaras a otra cosa.
>
> Bien al márgen de todo esto, habría la posibilidad que me ayudaras hacer
un
> código, yo no tengo tantos conocimientos de programación como para
hacerlo.
>
> Gracias y siento el malentendido
>
>
> "AnSanVal" escribió:
>
> > Hola Maria. Dices que no te contestó nadie, al menos para mi yo soy
alguien,
> > y te repito lo que te contesté:
> >
> > > Tengo una tabla de excel a la que accede distintos usarios, desearía
saber
> > > si se pueden poner distintas claves para los distintos usuarios y que
> > > quede registrado quién hizo los cambios.
> >
> > Podrias (mediante código) en el evento BeforeSave, que la hoja se guarde
> > protegida, mediante contraseña. Al abrir el archivo pida una contraseña
de
> > usuario (NO la del archivo), y si la contraseña es válida, desproteja la
> > hoja y al realizarse un cambio en un registro escriba su usuario en la
misma
> > fila y en la columna 'x' (la columna podria estar oculta).
> >
> > > Hay forma de que ese regristro se pueda asociar sólo a una celda y no
a
> > > toda la hoja.
> >
> > ¿...? Aqui no se a que te refieres.
> >
> >
> > Lamento que no hayas considerado mi respuesta, pero al menos respondi.
En
> > cambio yo no obtuve respuesta tuya y no era yo quien pedia ayuda.
> >
> > Saludos desde Tenerife.
> >
> > "María" escribió en el mensaje
> > news:
> > > Hace unos días plantee una duda, pero nadie me respondió
> > > Vuelvo a intentarlo ¿Es posible hacer lo que más abajo expongo?
> > > En un principio SOLO me interesa saber si es o no posible.
> > >
> > > Tengo una tabla de excel a la que accede distintos usarios, desearía
saber
> > > si
> > > se pueden poner distintas claves para los distintos usuarios y que
quede
> > > registrado quién hizo los cambios.
> > > Hay forma de que ese regristro se pueda asociar sólo a una celda y no
a
> > > toda
> > > la hoja.
> > >
> > > Sé que soy recurrente, pero que quereis a estas alturas no voy a
cambiar
> > >
> >
> >
> >

dentro del modulo Thisworkbook en workbook_open()
Prueba este codigo para saber si te devuelve el usuario que esta abriendo el
archivo, no lo puedo probar yo debido a que no tengo Pc´s n red de momento.
en un libro en blanco de preferencia y nos comentas el resultado :)

Private Sub Workbook_Open()
Sheets(1).Select
Set WshNetwork = CreateObject("WScript.Network")
[A1] = "Domain = " & WshNetwork.UserDomain
[A2] = "Computer Name = " & WshNetwork.ComputerName
[A3] = "User Name = " & WshNetwork.UserName
Set WshNetwork = Nothing
End Sub

Saludos

Atte.
?T Francisco T?
http://groups.msn.com/ExcelVbaMacrosOffice

El verdadero buscador crece y aprende, y descubre que siempre es el
principal responsable de lo que sucede.
Jorge Bucay

La oscuridad nos envuelve a todos, pero mientras el sabio tropieza en alguna
pared, el ignorante permanece tranquilo en el centro de la estancia.
Anatole France

Hola Francisco, gracias por contestar, aquí ando peleando con el ordenador y
la ordén que me has escrito.
Bien, creo que voy a necesitar un poco más de tiempo para saber si lo que
hace, me vale para lo que quiero. Si es así ya te comentaré más adelante.
Gracias de nuevo por dedicarme este tiempo

"Francisco Parrilla" escribió:

dentro del modulo Thisworkbook en workbook_open()
Prueba este codigo para saber si te devuelve el usuario que esta abriendo el
archivo, no lo puedo probar yo debido a que no tengo Pc´s n red de momento.
en un libro en blanco de preferencia y nos comentas el resultado :)

Private Sub Workbook_Open()
Sheets(1).Select
Set WshNetwork = CreateObject("WScript.Network")
[A1] = "Domain = " & WshNetwork.UserDomain
[A2] = "Computer Name = " & WshNetwork.ComputerName
[A3] = "User Name = " & WshNetwork.UserName
Set WshNetwork = Nothing
End Sub

Saludos

Atte.
?T Francisco T?
http://groups.msn.com/ExcelVbaMacrosOffice

El verdadero buscador crece y aprende, y descubre que siempre es el
principal responsable de lo que sucede.
Jorge Bucay

La oscuridad nos envuelve a todos, pero mientras el sabio tropieza en alguna
pared, el ignorante permanece tranquilo en el centro de la estancia.
Anatole France

Bien Francisco en un principio la orden sólo me sirve para que aparezca en
una esquina de la tabla de excel desde que ordenador estoy funcionando, pero
yo quiero que quede reflejado en algún sitio para poder hacer un "historial"
desde losa ordenadores que se han hecho los cambios. Eso sería una posibilidad

Gracias de nuevo

"Francisco Parrilla" escribió:

dentro del modulo Thisworkbook en workbook_open()
Prueba este codigo para saber si te devuelve el usuario que esta abriendo el
archivo, no lo puedo probar yo debido a que no tengo Pc´s n red de momento.
en un libro en blanco de preferencia y nos comentas el resultado :)

Private Sub Workbook_Open()
Sheets(1).Select
Set WshNetwork = CreateObject("WScript.Network")
[A1] = "Domain = " & WshNetwork.UserDomain
[A2] = "Computer Name = " & WshNetwork.ComputerName
[A3] = "User Name = " & WshNetwork.UserName
Set WshNetwork = Nothing
End Sub

Saludos

Atte.
?T Francisco T?
http://groups.msn.com/ExcelVbaMacrosOffice

El verdadero buscador crece y aprende, y descubre que siempre es el
principal responsable de lo que sucede.
Jorge Bucay

La oscuridad nos envuelve a todos, pero mientras el sabio tropieza en alguna
pared, el ignorante permanece tranquilo en el centro de la estancia.
Anatole France

Lo siento Maria, no habia vuelto a leer este hilo [ no habia llegado hasta
aqui :-( ].
No hay nada que perdonar [ y menos a una paisana ;-) sea de la isla que
sea ], todos nos equivocamos, y yo más que nadie :-(. De cualquier manera
una persona que es capaz de disculparse, ante la sospecha de que puede
haberse equivocado, merece toda la ayuda que se le pueda prestar.

Ya no veo el mensaje en cuestión, ya lo borré, yo leo las noticias en el
Outlook Express y cuando pasa un tiempo las borro, pero no pasa nada.

Un saludo desde "la isla de enfrente".