OVH Cloud OVH Cloud

Comptes Utilisateur et Acces Cellules

10 réponses
Avatar
Abileor
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance

10 réponses

Avatar
JB
On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB

Avatar
Abileor
MErci JB mais ca ne marche pas


"JB" a écrit dans le message de news:

On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB

Avatar
Abileor
Pour compléter ma réponse en fait ca marche avec un mot de passe propre a
chaque utilisateur

Mois j'aimerai que chaque utilisateur puisse modifier sa ligne mais pas
celle des autres

Merci
"Abileor" a écrit dans le message de news:
45d2f973$0$25930$
MErci JB mais ca ne marche pas


"JB" a écrit dans le message de news:

On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB





Avatar
JB
Bonsoir,

Si on ne veut pas entrer de mot de passe, il faut s'appuyer sur le nom
de user réseau:

http://cjoint.com/?couChfzv8Q

On enlève le verrouillage du champ de l'utilisateur à l'ouverture.
Le nom du champ doit être le nom user.

Private Sub Workbook_Open()
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = False
Sheets(1).Protect Password:=""
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = True
Sheets(1).Protect Password:=""
End Sub

On 14 fév, 18:11, "Abileor" wrote:
Pour compléter ma réponse en fait ca marche avec un mot de passe prop re a
chaque utilisateur

Mois j'aimerai que chaque utilisateur puisse modifier sa ligne mais pas
celle des autres

Merci
"Abileor" a écrit dans le message de news:
45d2f973$0$25930$



MErciJBmais ca ne marche pas

"JB" a écrit dans le message de news:

On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a l'ada pter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -




Avatar
Abileor
JB = génie
J'ai simplement fait une modif... sur le réseau nous sommes connus sous
notre matricule.. vive l'Administration...

Et certains matricules posés pb... je ne pouvais nommé la plage... elle me
renvoyé un nom non valide (interpretant le nom cor la ref d'une cellule ex
s016759 = colonne S ligne 16759) j'ai donc modivié le nom comme suite

Sheets(1).Range("TOTO" + Environ"username")).Locked = False

Et c'est super....


"JB" a écrit dans le message de news:


Bonsoir,

Si on ne veut pas entrer de mot de passe, il faut s'appuyer sur le nom
de user réseau:

http://cjoint.com/?couChfzv8Q

On enlève le verrouillage du champ de l'utilisateur à l'ouverture.
Le nom du champ doit être le nom user.

Private Sub Workbook_Open()
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = False
Sheets(1).Protect Password:=""
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = True
Sheets(1).Protect Password:=""
End Sub

On 14 fév, 18:11, "Abileor" wrote:
Pour compléter ma réponse en fait ca marche avec un mot de passe propre a
chaque utilisateur

Mois j'aimerai que chaque utilisateur puisse modifier sa ligne mais pas
celle des autres

Merci
"Abileor" a écrit dans le message de news:
45d2f973$0$25930$



MErciJBmais ca ne marche pas

"JB" a écrit dans le message de news:

On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a
l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -




Avatar
Abileor
Tout allait sauf...

que je complique

Est il possible de faire la meme chose mais avec les contraintes suivantes

Ma feuille est protégée

Toute les cellules sont dévérouillées modifiables sauf certaines (en fait
c'est un planning dans lequel j'utilise la fonction de mise en forme de JB)
celles correspondant aux WE

Avec ta solution qui marche d'enfer si je ne selectionne pas de WE tout
fonctionne parcontre si j'inclus un WE... l'agent qui choisi son choix dans
la barre remplace le WE par son choix car c'est la feuille entriere qui
devient dévérouillée...

UN solution pour ne donner acces qu'aux cellules dévérouillées de chaque
utilisateur


Merci d'avance pour vos répons et votre dispo surtout







"Abileor" a écrit dans le message de news:
45d49906$0$27389$
JB = génie
J'ai simplement fait une modif... sur le réseau nous sommes connus sous
notre matricule.. vive l'Administration...

Et certains matricules posés pb... je ne pouvais nommé la plage... elle me
renvoyé un nom non valide (interpretant le nom cor la ref d'une cellule ex
s016759 = colonne S ligne 16759) j'ai donc modivié le nom comme suite

Sheets(1).Range("TOTO" + Environ"username")).Locked = False

Et c'est super....


"JB" a écrit dans le message de news:


Bonsoir,

Si on ne veut pas entrer de mot de passe, il faut s'appuyer sur le nom
de user réseau:

http://cjoint.com/?couChfzv8Q

On enlève le verrouillage du champ de l'utilisateur à l'ouverture.
Le nom du champ doit être le nom user.

Private Sub Workbook_Open()
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = False
Sheets(1).Protect Password:=""
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = True
Sheets(1).Protect Password:=""
End Sub

On 14 fév, 18:11, "Abileor" wrote:
Pour compléter ma réponse en fait ca marche avec un mot de passe propre a
chaque utilisateur

Mois j'aimerai que chaque utilisateur puisse modifier sa ligne mais pas
celle des autres

Merci
"Abileor" a écrit dans le message de news:
45d2f973$0$25930$



MErciJBmais ca ne marche pas

"JB" a écrit dans le message de news:

On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a
l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -









Avatar
JB
Bonsoir,

J'a du mal à idendifier le pb . De quel planning s'agit t-il?
Il faudrait m'envoyer un exemple.

JB
On 22 fév, 21:41, "Abileor" wrote:
Tout allait sauf...

que je complique

Est il possible de faire la meme chose mais avec les contraintes suivantes

Ma feuille est protégée

Toute les cellules sont dévérouillées modifiables sauf certaines (e n fait
c'est un planning dans lequel j'utilise la fonction de mise en forme de J B)
celles correspondant aux WE

Avec ta solution qui marche d'enfer si je ne selectionne pas de WE tout
fonctionne parcontre si j'inclus un WE... l'agent qui choisi son choix da ns
la barre remplace le WE par son choix car c'est la feuille entriere qui
devient dévérouillée...

UN solution pour ne donner acces qu'aux cellules dévérouillées de c haque
utilisateur

Merci d'avance pour vos répons et votre dispo surtout

"Abileor" a écrit dans le message de news:
45d49906$0$27389$



JB = génie
J'ai simplement fait une modif... sur le réseau nous sommes connus so us
notre matricule.. vive l'Administration...

Et certains matricules posés pb... je ne pouvais nommé la plage... elle me
renvoyé un nom non valide (interpretant le nom cor la ref d'une cellu le ex
s016759 = colonne S ligne 16759) j'ai donc modivié le nom comme sui te

Sheets(1).Range("TOTO" + Environ"username")).Locked = False

Et c'est super....

"JB" a écrit dans le message de news:


Bonsoir,

Si on ne veut pas entrer de mot de passe, il faut s'appuyer sur le nom
de user réseau:

http://cjoint.com/?couChfzv8Q

On enlève le verrouillage du champ de l'utilisateur à l'ouverture.
Le nom du champ doit être le nom user.

Private Sub Workbook_Open()
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = False
Sheets(1).Protect Password:=""
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = True
Sheets(1).Protect Password:=""
End Sub

On 14 fév, 18:11, "Abileor" wrote:
Pour compléter ma réponse en fait ca marche avec un mot de passe p ropre a
chaque utilisateur

Mois j'aimerai que chaque utilisateur puisse modifier sa ligne mais pas
celle des autres

Merci
"Abileor" a écrit dans le message de news:
45d2f973$0$25930$

MErciJBmais ca ne marche pas

"JB" a écrit dans le message de news:

On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a
l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -- Masquer le texte de s messages précédents -



- Afficher le texte des messages précédents -






Avatar
Abileor
voila

http://www.forum-openoffice.org/ci-joint/fichier/2007/03/08-063407.xls
et
http://www.forum-openoffice.org/ci-joint/fichier/2007/03/08-063454.xls


Bonjour JB et merci pour tes réponses et ton site qui est fabuleux

Je reviens vers vous comme vous me l'avez demandé sur le forum excel (apres
une semaine de vacances bien méritée enfin je le pense)

J'ai adapté votre fabuleux calendrier aux besoins de mon service

Mais tout le monde n'étant pas doué ou ne faisant pas tres attention je
voulais ne permettre la modif des lignes qu'aux utilisateurs concernés...

J'ai édulcoré mon fichier pour te faire part de mon pb

La ligne a modifer est tjs la même la 12 Abileor (c'est mon nom sur mon
réseau a la maison)

Le fichier planning 2007 2008 est sans gestion des utilsateurs la feuille
est protégée par mot de passe (moi) et les cellules C7>BL28 sont modifiables
sauf celles correspondants aux WE, jours de temps partiels et jours fériés
qui sont vérouillées... grace à la macro du module 9

Le fichier Planning_2007_2008_avec_utilisateur.xls lui est modifié afin de
permettre à chaque utilisateur de ne pourvoir modifier que sa ligne
Pour cela j'ai nommé la ligne 12 C12à BL 12 du nom de DieppeAbileor

"Private Sub Workbook_Open()
MsgBox "Current user is " & Application.UserName

Sheets("Juin").Unprotect Password:="moi"

On Error Resume Next

Sheets("Juin").Range("Dieppe" + Environ("username")).Locked = False

Sheets("Juin").Protect Password:="moi"

End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets("Juin").Unprotect Password:="moi"

On Error Resume Next
Sheets("Juin").Range("Dieppe" + Environ("username")).Locked = True
Sheets("Juin").Protect Password:="moi"
End Sub"

La feuille est donc déprotégée.... sur la ligne de l'utilisateur qui ouvre
le fichier


MON SOUCIS est donc le suivant

Dans le premier cas ( planning 2007 2008), l'utilisateur selectionne une
plage de cellule en choisissant par exemple des CAN mais si cette selection
englobe un WE les CAN ne sont pas comptabilisés les jours de WE ou jours
féries ce qui est bon...

Dans le deuxieme cas (Planning_2007_2008_avec_utilisateur.xls).... la
protection des jours féries et des jours de temps partiels sautent... ainsi
si l'utilisateur selection la meme plage les WE seront remplacés par des CAN

MON OBJECTIF est donc d'avoir un accés selectif tout en maintenant la
protection des Cellules WE et TP...


je ne sais pas si j'ai été clair

MERCI en tout cas

"JB" a écrit dans le message de news:

Bonsoir,

J'a du mal à idendifier le pb . De quel planning s'agit t-il?
Il faudrait m'envoyer un exemple.

JB
On 22 fév, 21:41, "Abileor" wrote:
Tout allait sauf...

que je complique

Est il possible de faire la meme chose mais avec les contraintes suivantes

Ma feuille est protégée

Toute les cellules sont dévérouillées modifiables sauf certaines (en fait
c'est un planning dans lequel j'utilise la fonction de mise en forme de
JB)
celles correspondant aux WE

Avec ta solution qui marche d'enfer si je ne selectionne pas de WE tout
fonctionne parcontre si j'inclus un WE... l'agent qui choisi son choix
dans
la barre remplace le WE par son choix car c'est la feuille entriere qui
devient dévérouillée...

UN solution pour ne donner acces qu'aux cellules dévérouillées de chaque
utilisateur

Merci d'avance pour vos répons et votre dispo surtout

"Abileor" a écrit dans le message de news:
45d49906$0$27389$



JB = génie
J'ai simplement fait une modif... sur le réseau nous sommes connus sous
notre matricule.. vive l'Administration...

Et certains matricules posés pb... je ne pouvais nommé la plage... elle
me
renvoyé un nom non valide (interpretant le nom cor la ref d'une cellule
ex
s016759 = colonne S ligne 16759) j'ai donc modivié le nom comme suite

Sheets(1).Range("TOTO" + Environ"username")).Locked = False

Et c'est super....

"JB" a écrit dans le message de news:


Bonsoir,

Si on ne veut pas entrer de mot de passe, il faut s'appuyer sur le nom
de user réseau:

http://cjoint.com/?couChfzv8Q

On enlève le verrouillage du champ de l'utilisateur à l'ouverture.
Le nom du champ doit être le nom user.

Private Sub Workbook_Open()
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = False
Sheets(1).Protect Password:=""
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets(1).Unprotect Password:=""
On Error Resume Next
Sheets(1).Range(Environ("username")).Locked = True
Sheets(1).Protect Password:=""
End Sub

On 14 fév, 18:11, "Abileor" wrote:
Pour compléter ma réponse en fait ca marche avec un mot de passe propre
a
chaque utilisateur

Mois j'aimerai que chaque utilisateur puisse modifier sa ligne mais pas
celle des autres

Merci
"Abileor" a écrit dans le message de news:
45d2f973$0$25930$

MErciJBmais ca ne marche pas

"JB" a écrit dans le message de news:

On 13 fév, 18:32, "Abileor" wrote:
Comment restreindre l'acces de certaines cellules en fonction de
l'utilisateur
J'ai bien vu une fonction USeraccess mais je n'ai pas réussi a
l'adapter
Ex Yannick peut modifier A1:A10
et Sylvie peut modifier B1: B10

Merci d'avance


Bonsoir,

Utiliser la commande Outils/Protection/Permettre aux utilisateurs
(Excel2002+)

http://cjoint.com/?cnt4TYMnhG

JB- Masquer le texte des messages précédents -


- Afficher le texte des messages précédents -- Masquer le texte des
messages précédents -



- Afficher le texte des messages précédents -






Avatar
R1
Abileor wrote:

voila

http://www.forum-openoffice.org/ci-joint/fichier/2007/03/08-063407.xls
et
http://www.forum-openoffice.org/ci-joint/fichier/2007/03/08-063454.xls


Original comme endroit pour placer ses fichiers d'exemples Excel ;-)
R1

Avatar
Abileor
j'avais chercher le site cijoint !!!!

Une réponse ???




"R1" a écrit dans le message de news:
%23z8jJO%
Abileor wrote:

voila

http://www.forum-openoffice.org/ci-joint/fichier/2007/03/08-063407.xls
et
http://www.forum-openoffice.org/ci-joint/fichier/2007/03/08-063454.xls


Original comme endroit pour placer ses fichiers d'exemples Excel ;-)
R1