Dans une feuille de calcul Excel, que je partage avec plusieurs collègues,
je voudrais ajouter une colonne dans laquelle je serai le seul à avoir le
droit d'écrire. Savez-vous comment faire ?
Mais attention il faut que mes collègues aient tous les droits sur les
autres colonnes, du moment que l'action ne modifie pas le contenu de la
première colonne. Ils doivent pouvoir par exemple supprimer une colonne mais
ils ne doivent pas pouvoir suprimer une ligne (car ils supprimeraient la
cellule de la première colonne ce que je ne veux pas). Ils ne doivent pas
non plus coller une ligne sur une autre pour la même raison. Vous voyez le
but de l'opération ?
Bonsoir,Pierre "Truc Muche" oui! garder la colonne dans un classeur que tu es le seul à avoir et de part et d'autres lire par formule les colonnes des autres.
...Vous voyez le but de l'opération ? non!
Cordialement.
lSteph
"Truc Muche" a écrit dans le message de news: 45200ccd$0$27391$
Bonjour
Dans une feuille de calcul Excel, que je partage avec plusieurs collègues, je voudrais ajouter une colonne dans laquelle je serai le seul à avoir le droit d'écrire. Savez-vous comment faire ?
Mais attention il faut que mes collègues aient tous les droits sur les autres colonnes, du moment que l'action ne modifie pas le contenu de la première colonne. Ils doivent pouvoir par exemple supprimer une colonne mais ils ne doivent pas pouvoir suprimer une ligne (car ils supprimeraient la cellule de la première colonne ce que je ne veux pas). Ils ne doivent pas non plus coller une ligne sur une autre pour la même raison. Vous voyez le but de l'opération ?
Merci d'avance pour votre aide, Pierre
Bonsoir,Pierre "Truc Muche"
oui!
garder la colonne dans un classeur que tu es le seul à avoir
et de part et d'autres lire par formule les colonnes des autres.
...Vous voyez le but de l'opération ?
non!
Cordialement.
lSteph
"Truc Muche" <truc.muche@wanadoo.fr> a écrit dans le message de news:
45200ccd$0$27391$ba4acef3@news.orange.fr...
Bonjour
Dans une feuille de calcul Excel, que je partage avec plusieurs collègues,
je voudrais ajouter une colonne dans laquelle je serai le seul à avoir le
droit d'écrire. Savez-vous comment faire ?
Mais attention il faut que mes collègues aient tous les droits sur les
autres colonnes, du moment que l'action ne modifie pas le contenu de la
première colonne. Ils doivent pouvoir par exemple supprimer une colonne
mais ils ne doivent pas pouvoir suprimer une ligne (car ils supprimeraient
la cellule de la première colonne ce que je ne veux pas). Ils ne doivent
pas non plus coller une ligne sur une autre pour la même raison. Vous
voyez le but de l'opération ?
Bonsoir,Pierre "Truc Muche" oui! garder la colonne dans un classeur que tu es le seul à avoir et de part et d'autres lire par formule les colonnes des autres.
...Vous voyez le but de l'opération ? non!
Cordialement.
lSteph
"Truc Muche" a écrit dans le message de news: 45200ccd$0$27391$
Bonjour
Dans une feuille de calcul Excel, que je partage avec plusieurs collègues, je voudrais ajouter une colonne dans laquelle je serai le seul à avoir le droit d'écrire. Savez-vous comment faire ?
Mais attention il faut que mes collègues aient tous les droits sur les autres colonnes, du moment que l'action ne modifie pas le contenu de la première colonne. Ils doivent pouvoir par exemple supprimer une colonne mais ils ne doivent pas pouvoir suprimer une ligne (car ils supprimeraient la cellule de la première colonne ce que je ne veux pas). Ils ne doivent pas non plus coller une ligne sur une autre pour la même raison. Vous voyez le but de l'opération ?
Merci d'avance pour votre aide, Pierre
JB
Bonsoir,
http://cjoint.com/?kbvMUCgway
Enlève la protection du champ de l'utilisateur connecté -les noms des champs sont les noms des users réseau -Il n'y a pas de mote de passe à saisir
Créer des noms de champ qui correspondent aux noms de user réseau
Private Sub Workbook_Open() Sheets(1).Unprotect Password:="" nomUser = Environ("username") On Error Resume Next Sheets(1).Range(nomUser).Locked = False If Err = 0 Then Sheets(1).Protect Password:="" ActiveSheet.EnableSelection = xlUnlockedCells Else MsgBox "Bye" ActiveWorkbook.Close End If End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Sheets(1).Unprotect Password:="" Sheets(1).Cells.Locked = True Sheets(1).Protect Password:="" End Sub
Cordialement JB
Bonjour
Dans une feuille de calcul Excel, que je partage avec plusieurs collègu es, je voudrais ajouter une colonne dans laquelle je serai le seul à avoir le droit d'écrire. Savez-vous comment faire ?
Mais attention il faut que mes collègues aient tous les droits sur les autres colonnes, du moment que l'action ne modifie pas le contenu de la première colonne. Ils doivent pouvoir par exemple supprimer une colonne mais ils ne doivent pas pouvoir suprimer une ligne (car ils supprimeraient la cellule de la première colonne ce que je ne veux pas). Ils ne doivent p as non plus coller une ligne sur une autre pour la même raison. Vous voyez le but de l'opération ?
Merci d'avance pour votre aide, Pierre
Bonsoir,
http://cjoint.com/?kbvMUCgway
Enlève la protection du champ de l'utilisateur connecté
-les noms des champs sont les noms des users réseau
-Il n'y a pas de mote de passe à saisir
Créer des noms de champ qui correspondent aux noms de user réseau
Private Sub Workbook_Open()
Sheets(1).Unprotect Password:=""
nomUser = Environ("username")
On Error Resume Next
Sheets(1).Range(nomUser).Locked = False
If Err = 0 Then
Sheets(1).Protect Password:=""
ActiveSheet.EnableSelection = xlUnlockedCells
Else
MsgBox "Bye"
ActiveWorkbook.Close
End If
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets(1).Unprotect Password:=""
Sheets(1).Cells.Locked = True
Sheets(1).Protect Password:=""
End Sub
Cordialement JB
Bonjour
Dans une feuille de calcul Excel, que je partage avec plusieurs collègu es,
je voudrais ajouter une colonne dans laquelle je serai le seul à avoir le
droit d'écrire. Savez-vous comment faire ?
Mais attention il faut que mes collègues aient tous les droits sur les
autres colonnes, du moment que l'action ne modifie pas le contenu de la
première colonne. Ils doivent pouvoir par exemple supprimer une colonne mais
ils ne doivent pas pouvoir suprimer une ligne (car ils supprimeraient la
cellule de la première colonne ce que je ne veux pas). Ils ne doivent p as
non plus coller une ligne sur une autre pour la même raison. Vous voyez le
but de l'opération ?
Enlève la protection du champ de l'utilisateur connecté -les noms des champs sont les noms des users réseau -Il n'y a pas de mote de passe à saisir
Créer des noms de champ qui correspondent aux noms de user réseau
Private Sub Workbook_Open() Sheets(1).Unprotect Password:="" nomUser = Environ("username") On Error Resume Next Sheets(1).Range(nomUser).Locked = False If Err = 0 Then Sheets(1).Protect Password:="" ActiveSheet.EnableSelection = xlUnlockedCells Else MsgBox "Bye" ActiveWorkbook.Close End If End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Sheets(1).Unprotect Password:="" Sheets(1).Cells.Locked = True Sheets(1).Protect Password:="" End Sub
Cordialement JB
Bonjour
Dans une feuille de calcul Excel, que je partage avec plusieurs collègu es, je voudrais ajouter une colonne dans laquelle je serai le seul à avoir le droit d'écrire. Savez-vous comment faire ?
Mais attention il faut que mes collègues aient tous les droits sur les autres colonnes, du moment que l'action ne modifie pas le contenu de la première colonne. Ils doivent pouvoir par exemple supprimer une colonne mais ils ne doivent pas pouvoir suprimer une ligne (car ils supprimeraient la cellule de la première colonne ce que je ne veux pas). Ils ne doivent p as non plus coller une ligne sur une autre pour la même raison. Vous voyez le but de l'opération ?
Merci d'avance pour votre aide, Pierre
Truc Muche
Je te remercie pour ta réponse, mais je me suis mal expliqué, je ne partage pas ce fichier Excel en réseau. On le partage simplement en se l'envoyant les uns aux autres.
Imagine par exemple que je t'envoie ce fichier Excel pourque tu puisses y ajouter des informations ou mettre à jour celles qui y sont, mais je ne veux pas que tu modifies les données de la première colonne car ce sont les miennes et tu n'as pas à y toucher.
Comment puis-je protéger la 1ere colonne ?
Je te remercie pour ta réponse, mais je me suis mal expliqué, je ne partage
pas ce fichier Excel en réseau. On le partage simplement en se l'envoyant
les uns aux autres.
Imagine par exemple que je t'envoie ce fichier Excel pourque tu puisses y
ajouter des informations ou mettre à jour celles qui y sont, mais je ne veux
pas que tu modifies les données de la première colonne car ce sont les
miennes et tu n'as pas à y toucher.
Je te remercie pour ta réponse, mais je me suis mal expliqué, je ne partage pas ce fichier Excel en réseau. On le partage simplement en se l'envoyant les uns aux autres.
Imagine par exemple que je t'envoie ce fichier Excel pourque tu puisses y ajouter des informations ou mettre à jour celles qui y sont, mais je ne veux pas que tu modifies les données de la première colonne car ce sont les miennes et tu n'as pas à y toucher.
Comment puis-je protéger la 1ere colonne ?
JB
Outils/protection/permettre aux utilisateurs de modifier les plages
Mot de passe: Jacques
http://cjoint.com/?kbwEhUgKC6
Cordialement JB
Je te remercie pour ta réponse, mais je me suis mal expliqué, je ne p artage pas ce fichier Excel en réseau. On le partage simplement en se l'envoya nt les uns aux autres.
Imagine par exemple que je t'envoie ce fichier Excel pourque tu puisses y ajouter des informations ou mettre à jour celles qui y sont, mais je ne veux pas que tu modifies les données de la première colonne car ce sont les miennes et tu n'as pas à y toucher.
Comment puis-je protéger la 1ere colonne ?
Outils/protection/permettre aux utilisateurs de modifier les plages
Mot de passe: Jacques
http://cjoint.com/?kbwEhUgKC6
Cordialement JB
Je te remercie pour ta réponse, mais je me suis mal expliqué, je ne p artage
pas ce fichier Excel en réseau. On le partage simplement en se l'envoya nt
les uns aux autres.
Imagine par exemple que je t'envoie ce fichier Excel pourque tu puisses y
ajouter des informations ou mettre à jour celles qui y sont, mais je ne veux
pas que tu modifies les données de la première colonne car ce sont les
miennes et tu n'as pas à y toucher.
Outils/protection/permettre aux utilisateurs de modifier les plages
Mot de passe: Jacques
http://cjoint.com/?kbwEhUgKC6
Cordialement JB
Je te remercie pour ta réponse, mais je me suis mal expliqué, je ne p artage pas ce fichier Excel en réseau. On le partage simplement en se l'envoya nt les uns aux autres.
Imagine par exemple que je t'envoie ce fichier Excel pourque tu puisses y ajouter des informations ou mettre à jour celles qui y sont, mais je ne veux pas que tu modifies les données de la première colonne car ce sont les miennes et tu n'as pas à y toucher.
Comment puis-je protéger la 1ere colonne ?
Truc Muche
J'ai essayé mais cela ne donne pas tous les droits aux utilisateurs : iils ne peuvent pas supprimer une colonne ou faire glisser une cellule sur une autre par exemple.
J'ai essayé mais cela ne donne pas tous les droits aux utilisateurs : iils
ne peuvent pas supprimer une colonne ou faire glisser une cellule sur une
autre par exemple.
J'ai essayé mais cela ne donne pas tous les droits aux utilisateurs : iils ne peuvent pas supprimer une colonne ou faire glisser une cellule sur une autre par exemple.
JB
Dans Outils/Protection/protéger la feuille, il faut cocher les options Insérer lignes,Insérer colonnes,...
Auutre version VBA:
http://cjoint.com/?kbxbUU3lSp
La colonne A n'est modifiable que si on connait le mot de passe
Private Sub B_ok_Click() Sheets(1).Unprotect Password:="jacques" If Me.motpasse = "jacques" Then [A:A].Locked = False End If [B:Z].Locked = False ActiveSheet.Protect DrawingObjects:úlse, Contents:=True, Scenarios:= _ False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _ AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows _ :=True, AllowInsertingHyperlinks:=True, AllowDeletingColumns:=True, _ AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True, _ AllowUsingPivotTables:=True, Password:="jacques" Unload Me End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Sheets(1).Unprotect Password:="jacques" [A:Z].Locked = True Sheets(1).Protect Password:="jacques" End Sub
Private Sub Workbook_Open() UserForm1.Show End Sub
JB
J'ai essayé mais cela ne donne pas tous les droits aux utilisateurs : i ils ne peuvent pas supprimer une colonne ou faire glisser une cellule sur une autre par exemple.
Dans Outils/Protection/protéger la feuille, il faut cocher les options
Insérer lignes,Insérer colonnes,...
Auutre version VBA:
http://cjoint.com/?kbxbUU3lSp
La colonne A n'est modifiable que si on connait le mot de passe
Private Sub B_ok_Click()
Sheets(1).Unprotect Password:="jacques"
If Me.motpasse = "jacques" Then
[A:A].Locked = False
End If
[B:Z].Locked = False
ActiveSheet.Protect DrawingObjects:=False, Contents:=True,
Scenarios:= _
False, AllowFormattingCells:=True,
AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowInsertingColumns:=True,
AllowInsertingRows _
:=True, AllowInsertingHyperlinks:=True,
AllowDeletingColumns:=True, _
AllowDeletingRows:=True, AllowSorting:=True,
AllowFiltering:=True, _
AllowUsingPivotTables:=True, Password:="jacques"
Unload Me
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets(1).Unprotect Password:="jacques"
[A:Z].Locked = True
Sheets(1).Protect Password:="jacques"
End Sub
Private Sub Workbook_Open()
UserForm1.Show
End Sub
JB
J'ai essayé mais cela ne donne pas tous les droits aux utilisateurs : i ils
ne peuvent pas supprimer une colonne ou faire glisser une cellule sur une
autre par exemple.
Dans Outils/Protection/protéger la feuille, il faut cocher les options Insérer lignes,Insérer colonnes,...
Auutre version VBA:
http://cjoint.com/?kbxbUU3lSp
La colonne A n'est modifiable que si on connait le mot de passe
Private Sub B_ok_Click() Sheets(1).Unprotect Password:="jacques" If Me.motpasse = "jacques" Then [A:A].Locked = False End If [B:Z].Locked = False ActiveSheet.Protect DrawingObjects:úlse, Contents:=True, Scenarios:= _ False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _ AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows _ :=True, AllowInsertingHyperlinks:=True, AllowDeletingColumns:=True, _ AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True, _ AllowUsingPivotTables:=True, Password:="jacques" Unload Me End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Sheets(1).Unprotect Password:="jacques" [A:Z].Locked = True Sheets(1).Protect Password:="jacques" End Sub
Private Sub Workbook_Open() UserForm1.Show End Sub
JB
J'ai essayé mais cela ne donne pas tous les droits aux utilisateurs : i ils ne peuvent pas supprimer une colonne ou faire glisser une cellule sur une autre par exemple.
Truc Muche
Bonjour JB
C'est complètement magique, c'est exactement cela que je voulais. Super vraiment merci tu es un as.
Pierre
Bonjour JB
C'est complètement magique, c'est exactement cela que je voulais. Super
vraiment merci tu es un as.
C'est complètement magique, c'est exactement cela que je voulais. Super vraiment merci tu es un as.
Pierre
Truc Muche
C'est encore moi, j'ai encore un léger problème :o)
Je suis totalement nul en visual basic et je n'arrive pas à recopier ton programme dans un autre classer Excel. J'arrive bien à créer une nouvelle macro par le menu outil / macro / nouvelle macro. Je sais aussi ouvrir visual basi editor. Mais après je sais plus quoi faire. Peux-tu m'aider encore ?
Merci, Pierre
C'est encore moi, j'ai encore un léger problème :o)
Je suis totalement nul en visual basic et je n'arrive pas à recopier ton
programme dans un autre classer Excel. J'arrive bien à créer une nouvelle
macro par le menu outil / macro / nouvelle macro. Je sais aussi ouvrir
visual basi editor. Mais après je sais plus quoi faire. Peux-tu m'aider
encore ?
C'est encore moi, j'ai encore un léger problème :o)
Je suis totalement nul en visual basic et je n'arrive pas à recopier ton programme dans un autre classer Excel. J'arrive bien à créer une nouvelle macro par le menu outil / macro / nouvelle macro. Je sais aussi ouvrir visual basi editor. Mais après je sais plus quoi faire. Peux-tu m'aider encore ?
C'est encore moi, j'ai encore un léger problème :o)
Je suis totalement nul en visual basic et je n'arrive pas à recopier ton programme dans un autre classer Excel. J'arrive bien à créer une nouvelle macro par le menu outil / macro / nouvelle macro. Je sais aussi ouvrir visual basi editor. Mais après je sais plus quoi faire. Peux-tu m'aider encore ?
C'est encore moi, j'ai encore un léger problème :o)
Je suis totalement nul en visual basic et je n'arrive pas à recopier ton
programme dans un autre classer Excel. J'arrive bien à créer une nouvelle
macro par le menu outil / macro / nouvelle macro. Je sais aussi ouvrir
visual basi editor. Mais après je sais plus quoi faire. Peux-tu m'aider
encore ?
C'est encore moi, j'ai encore un léger problème :o)
Je suis totalement nul en visual basic et je n'arrive pas à recopier ton programme dans un autre classer Excel. J'arrive bien à créer une nouvelle macro par le menu outil / macro / nouvelle macro. Je sais aussi ouvrir visual basi editor. Mais après je sais plus quoi faire. Peux-tu m'aider encore ?
Merci, Pierre
Truc Muche
Ca y est j'y suis arrivé. J'ai ouvert ton classeur et le mien en même temps et dans l'explorateur j'ai fait gliser les objets pour que ca devienne pareil. C'est super encore merci. Pierre
Ca y est j'y suis arrivé. J'ai ouvert ton classeur et le mien en même temps
et dans l'explorateur j'ai fait gliser les objets pour que ca devienne
pareil. C'est super encore merci. Pierre
Ca y est j'y suis arrivé. J'ai ouvert ton classeur et le mien en même temps et dans l'explorateur j'ai fait gliser les objets pour que ca devienne pareil. C'est super encore merci. Pierre
