Rendre inefficace le Unprotect du menu Excel

Bonjour,

J'essai de bloquer mes cellules entre chaque modification par mes macros, pour ce faire j'utilise les lignes suivantes:

Code:

---

1 2 3 4 5

ActiveSheet.Unprotect   ......   ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:=True

---

Cela fonctionne très bien. Malheureusement lorsque l'utilisateur click sur une cellule bloquée, un popup apparaît lui indiquant la marche à suivre pour rendre actif les cellules ( commande ôter protection de la feuille, onglet révision, groupe modification).

Comment faire pour rendre impossible cette action?

En espérant avoir été assez clair,
un grand merci

MA

salut
je me rappelle plus de la syntaxe exacte, mais regarde du coté de
displayalert = false (ou true). par contre ce n'est peut etre que pour les message d'alerte
et tu as aussi la possibilité peut etre plus simple de décocher la case selectionner les cellule protégés au moment de la création de la protection

Bonjour,
Pour éviter le message d'alerte lorsque l'on sélectionne une cellule protégée, il suffit de décocher l'option Sélectionner les cellules verrouillées dans la boite de dialogue Protéger la feuille.
Ainsi seules les cellules non protégées sont accessibles.
De plus, il n'est pas utile de déprotéger et ensuite de reprotéger pour écrire dans une feuille protégée, il suffit en protégeant la feuille de donner la valeur True l'argument nommé UserinterfaceOnly
Exemple

Code:

---

1 2 3 4 5 6 7 8 9

Sub Test() Dim sht As Worksheet Set sht = ThisWorkbook.Worksheets("Feuil2") With sht .Protect Password:="toto", UserinterfaceOnly:=True .EnableSelection = xlUnlockedCells End With sht.Range("A1") = "Coucou" End Sub

---

Un grand merci pour cette réponse, ça va me faciliter grandement le travail!!!!