Discussion :

[janigrel]

Bonjour à la communauté.

Dans un fichier partagé (car utilisé par plusieurs utilisateurs) avec la feuille principale protégée (sauf certaines plages de saisies qui sont donc déprotégées), je souhaite colorer en vert le texte des cellules saisies par les utilisateurs.
J'ai utilisé la méthode Unprotect et Protect sur la feuille active pour contourner le problème du classeur partagé.

J'ai tout de même un problème dû au partage du classeur (ma macro fonctionne impeccablement quand le classeur n'est pas partagé). Le message d'erreur suivant apparaît :
" La méthode unprotect de la classe Worksheet a échoué"...
Malgré mes recherches sur le forum, je n'ai pas trouvé de solution : quelqu'un peut-il m'aider à solutionner ce problème? Merci par avance.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Option Compare Text
Option Explicit
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
ActiveSheet.Unprotect ("azerty")
 
If Not Application.Intersect(Target, Range("AA8:AC2728")) Is Nothing Then Target.Font.ColorIndex = 10
If Not Application.Intersect(Target, Range("AN8:AO2728")) Is Nothing Then Target.Font.ColorIndex = 10
If Not Application.Intersect(Target, Range("AQ8:AQ2728")) Is Nothing Then Target.Font.ColorIndex = 10
If Not Application.Intersect(Target, Range("AV8:AW2728")) Is Nothing Then Target.Font.ColorIndex = 10
If Not Application.Intersect(Target, Range("BA8:BA2728")) Is Nothing Then Target.Font.ColorIndex = 10
 
ActiveSheet.Protect ("azerty")
 
End Sub

[clementmarcotte]

Bonjour,

Je ne m'y connaît pas trop en partage de classeur, mais, sauf horreur de ma part, un seul utilisateur (le premier qui l'a ouvert) peut le modifier. Je suppose que si tu n'est pas le privilégié, c'est tout à fait normal.

Excel n'est pas capable de gérer les "conflits" et les "télescopages" quand deux utilisateurs essaient de modifier la même cellule en même temps. La façon de protéger les utilisateurs contre eux-mêmes est de ne pas permettre les modifications ou enregistrements simultanés, sauf dans le cas d'enregistrement sous deux noms différents.

quelqu'un peut-il m'aider à solutionner ce problème? Merci par avance

Utiliser un outil qui peut gérer les modifications simultanées et arrêter de vouloir enfoncer des vis avec un marteau, si on peut dire.

[janigrel]

Bonjour Clément.

Merci pour ta réponse.

Je confirme qu'en utilisant un classeur partagé, tous les utilisateurs peuvent l'utiliser simultanément, et enregistrer leurs modifications respectives sans difficultés.
Le conflit arrive lorsque, dans un classeur partagé, on souhaite protéger certaines cellules.
L'événement Worksheet_Change est alors capricieux : c'est pourquoi j'ai essayé de déprotéger ma feuille (unprotect) pour la reprotéger (protect) après la saisie, mais cela ne fonctionne toujours pas.

Quelqu'un a t-il une piste SVP?

Merci par avance.

[Marc-L]

Bonjour, bonjour !

Il ne s'agit pas d'un problème de protection de feuilles de calculs mais du fait du classeur partagé !
Et c'est pourtant simple à vérifier : si tout fonctionne avec le classeur non partagé
alors ce n'est pas possible quand le classeur est partagé …

Base de données, multi-utilisateurs, réseau, sécurité, … ne riment pas toujours bien avec Excel !
Voir du côté des add_ins payants pour surseoir aux diverses lacunes
mais franchement, autant envisager une application sous Access …

______________________________________________________________________________________________________
Je suis Paris, Charlie, …

[AlainTech]

Bonjour,

Pour ne pas devoir déprotéger dans le code, une possibilité:
Lancer une fois cette procédure

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sub RunOnce()
  ThisWorkbook.Sheets(1).Protect "azerty", userinterfaceonly:=True
End Sub

Qui empêchera les modifications par les utilisateurs mais permettra au code de s'exécuter sans déprotection.

[janigrel]

Merci AlainTech,

J'ai testé votre code. Pour cela, j'ai dû enlever le partage du classeur, puis j'ai fait rouler la macro, pour ensuite remettre le partage du classeur, et Euréka, ça marche!
Cependant, lorsque j'enregistre le classeur, que je le ferme et que je l'ouvre à nouveau, j'ai à nouveau le même problème.
J'ai pensé que je pourrais faire rouler votre macro à l'ouverture du classeur, mais comme il est partagé, la macro ne pourra s'exécuter...
Je ne sais pas bien comment solutionner ce problème...

Cordialement.

[clementmarcotte]

Bonjour,

Je ne sais pas bien comment solutionner ce problème...

Cordialement.

Ben, en n'utilisant pas de classeur partagé, ou en n'utilisant carrément pas Excel.

Cela ne sert pas à grand chose de remplacer un boulon et son écrou par une vis à bois.

Mais comme tu ne dis pas à quel(s) besoin(s) doit répondre ce classeur partagé que tu ne peux pas partager, difficile d'en dire plus.


Ceci dit, si tu veux le véritable et "officiel" fond de ma pensée; ce serait probablement encore moins de trouble de télécharger Visual Studio Community (gratuit), qui comprend, entre autres, SQL Server Compact, et d'apprendre VB.net (ou même C aiguisé, si tu aimes mieux le C), et de te monter une base de données qui a de l'allure avec SQL Server Compact, ou même une plus grosse, avec SQL Server Express (gratuit). Parce que là, à mesure que tes besoins vont évoluer, tu vas devoir continuer à programmer une usine à gaz dans Excel, alors qu'avec SQL Server, ou même Access, des requêtes Linq ou SQL permettraient d'agir plus facilement et plus rapidement. Même que Visual Studio, a des assistants pour construire ta base de données, et tes requêtes, graphiquement à l'écran. (Le même principe qu'avec Access.)

Et puis, on n'a pas encore parlé du fait que la "sécurité" d'Excel ne résiste qu'à des utilisateurs obéissants et honnêtes. De plus, Excel a toujours besoin de tout son classeur en mémoire vive pour fonctionner. Donc, plus ton classeur grossit, plus tu as de macros, plus tu as de tableaux, plus tu as de fonctions matricielles, plus tu risque le plantage d'Excel, plus tu risques les pertes de données et/ou la corruption de ton classeur.

Mais, je me suis habitué à prêcher dans le désert. Tout le monde scotché à Excel, a toujours de bonnes raisons de continuer d'avancer dans les sables mouvants.