Fichier partagé
rafaledu43
Messages postés
160
Date d'inscription
Statut
Membre
Dernière intervention
-
rafaledu43 Messages postés 160 Date d'inscription Statut Membre Dernière intervention -
rafaledu43 Messages postés 160 Date d'inscription Statut Membre Dernière intervention -
Bonsoir,
Avant de solliciter votre aide, j'ai essayé plusieurs solutions sur Internet, mais aucune ne marche. J'espère que vous pourrez me débloquer.
J'ai actuellement un fichier Excel avec des macros. Je souhaite que les utilisateurs de ce fichier puisse modifier les cellules uniquement à l'aide des différentes Userforms. Pour cela j'ai mis un mot de passe "Mdp" pour protéger la feuille.
Ce fichier est un fichier partagé sur le réseau.
Or lorsque je partage le fichier, les macros ne s'exucute pas, j'ai essayé d'utiliser la fonction "Sheet(1).UnProtect Passeword:="Mdp"" Mais cela me met une erreur "1004". Elle concerne l'Unprotect.
Je ne comprend pas comment je peux contourner le problème.
J'ai essayé de mettre le mot de passe dans ThisWorkbook et en le faisant manuelle sur la partie "Révision"
Le cahier des charges que j'ai:
- proteger la feuille 1 par un mot de passe
- utilisation unique des Userforms
- Fichier partagé sur le réseau
Je m'y connais moyennement en macros, il se peux que mon cahier des charges soit incompatible.
J'espère avoir pu expliqué correctement mon problème.
Bonne soirée
Avant de solliciter votre aide, j'ai essayé plusieurs solutions sur Internet, mais aucune ne marche. J'espère que vous pourrez me débloquer.
J'ai actuellement un fichier Excel avec des macros. Je souhaite que les utilisateurs de ce fichier puisse modifier les cellules uniquement à l'aide des différentes Userforms. Pour cela j'ai mis un mot de passe "Mdp" pour protéger la feuille.
Ce fichier est un fichier partagé sur le réseau.
Or lorsque je partage le fichier, les macros ne s'exucute pas, j'ai essayé d'utiliser la fonction "Sheet(1).UnProtect Passeword:="Mdp"" Mais cela me met une erreur "1004". Elle concerne l'Unprotect.
Je ne comprend pas comment je peux contourner le problème.
J'ai essayé de mettre le mot de passe dans ThisWorkbook et en le faisant manuelle sur la partie "Révision"
Le cahier des charges que j'ai:
- proteger la feuille 1 par un mot de passe
- utilisation unique des Userforms
- Fichier partagé sur le réseau
Je m'y connais moyennement en macros, il se peux que mon cahier des charges soit incompatible.
J'espère avoir pu expliqué correctement mon problème.
Bonne soirée
A voir également:
- Fichier partagé
- Fichier bin - Guide
- Fichier epub - Guide
- Partage de photos - Guide
- Fichier rar - Guide
- Comment réduire la taille d'un fichier - Guide
2 réponses
Bonjour,
les macros ne s'exucute pas,
Pouvez preciser, pas de deroulement du code ou probleme dû a la protection feuille?
Par contre, il faudrait plutot proteger comme ceci:
Permet de ne pas deproteger pour ecrire dans les cellules via la VBA
les macros ne s'exucute pas,
Pouvez preciser, pas de deroulement du code ou probleme dû a la protection feuille?
Par contre, il faudrait plutot proteger comme ceci:
With Worksheets(1)
.EnableAutoFilter = True 'pas de filtre
.Protect Password:="MDP", DrawingObjects:=True, Contents:=True, Scenarios:=True, userInterfaceOnly:=True
.EnableSelection = xlNoSelection 'pas de selection cellule
End With
Permet de ne pas deproteger pour ecrire dans les cellules via la VBA
Re,
Pas trouve de solution viable
classeur partage avec macros: protection feuille=binz
Une facon de faire qui est, peut-etre, un peu capilotractee mais qui marche. J'ai ete voir chez http://boisgontierjacques.free.fr/index2.htm (fichier .xls joint) et la ProtectionMultiChampsScrollArea va pas mal. Pas besoin de protection feuille
Principe: creer des zones d'access
votre cas: une zone "Invite" d'une seule cellule-->A1
votre fichier modifie: https://www.cjoint.com/c/GCFf6mAzktf
fichier boisgontierjacques: https://www.cjoint.com/c/GCFf7DgKhbf
Une autre facon de faire si vous n'avez pas besoin de voir EXCEL, masquer la fenetre EXCEL
Pas trouve de solution viable
classeur partage avec macros: protection feuille=binz
Une facon de faire qui est, peut-etre, un peu capilotractee mais qui marche. J'ai ete voir chez http://boisgontierjacques.free.fr/index2.htm (fichier .xls joint) et la ProtectionMultiChampsScrollArea va pas mal. Pas besoin de protection feuille
Principe: creer des zones d'access
votre cas: une zone "Invite" d'une seule cellule-->A1
votre fichier modifie: https://www.cjoint.com/c/GCFf6mAzktf
fichier boisgontierjacques: https://www.cjoint.com/c/GCFf7DgKhbf
Une autre facon de faire si vous n'avez pas besoin de voir EXCEL, masquer la fenetre EXCEL
Merci de m'apporter votre aide.
La macro s'exécute parfaitement avant le partage du fichier sur le réseau. Mais une fois le fichier partagé, j'obtiens directement à l'ouverture le code "1004 erreur définie par l'application ou par l'objet".
Je clique sur "Fin". Je clique sur le bouton d'ouverture de la Userform et une fois les données rentrer, après le clique sur le bouton "valider" qui permet de rentrer les données saisies, j'obtiens le message d'erreur: "1004 la cellule ou le graphique est protégé en lecture seul. Pour ôter la protection [...]".
Merci encore.
Bonne journée
Kévin
Ok, c'est un probleme de protection feuille, donc mettez le code que j'ai fourni dans ThisWorkbook
Workbook_Open
Plus besoin de ces lignes de code, seul le code dans thisworkbook, workbook_open suffit
Malheureusement j'ai toujours le même message: ""1004 erreur définie par l'application ou par l'objet". "
Je trouve ça vraiment bizzare étant donné que tout marche avant le partage multi-utilisateur ...