Discussion :

[Bisbis27]

Bonjour,

je voulais savoir si c'est possible de protéger une plage de cellule a partir d'un mot de passe en vba et si oui est ce que c'est possible que cette même plage soit à nouveau protégé chaque fois que je ferme le classeur et enregistre

bien cordialement

[BENNASR]

bonjour
je sais pas si ça t'aide ou non
mais si tu veux verrouiller la plage B8 à J8 si A8 est différent de vide tu peux essayez avec :

Code :

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

1
2
3
4
5
6
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$8" Then Exit Sub
Me.Unprotect
Range("B8:J8").Locked = Range("A8").Value <> ""
Me.Protect
End Sub

[Bisbis27]

C'est pas tout a fait ce que je veux faire,
je vais te joindre le fichier pour que tu puisses mieux voir
MATRICE ANALYSE TENDANCE .xlsm

je voudrai verrouiller la plage de cellule F5:AN9 et que seul la personne qui a le mot de passe puisse les modifier
Puis je voudrai que quand la personne ferme le fichier, la même plage de cellule soit a nouveau verrouiller et que seule les personnes possédant le mot de passe puissent modifier cette plage

Je sais pas si c'est plus clair ?

J'ai oublié de préciser c'est la feuille2 qui est concerné

[Menhir]

Pour protéger les cellules verrouillées d'une feuille, méthode Protect de Worksheet.
https://msdn.microsoft.com/fr-fr/lib...1(v=office.15)

Dans Excel, les cellules sont marquées verrouillées par défaut.
Donc, avant de placer la protection, il faut penser à déverrouiller toutes les cellules que tu veux laisser accessibles.
Pour ça, utilise la propriété Loked.
https://msdn.microsoft.com/fr-fr/lib...2(v=office.15)

à nouveau protégé chaque fois que je ferme le classeur et enregistre

Placer la procédure dans des macro évènementielles Workbook_BeforeClose et Workbook_BeforeSave.
https://docs.microsoft.com/fr-FR/off...ok.beforeclose
https://docs.microsoft.com/fr-FR/off...ook.beforesave

[MarcelG]

Bonjour BisBis,

Pour être précis,

Des cellules sont verrouillées ou non (VBA : propriété Locked à valeur booléenne VRAI, FAUX)
Une feuille est protégée ou non (VBA: Propriétés Protect et Unprotect, avec mot de passe ou pas)

Tu peux créer un bouton de commande qui va gérer l'une ou l'autre de ces propriétés.
Un mot de passe serait demandé
La modification ne s'effectuera pas jusqu'à ce que le mot de passe entré soit correct.

Je ne vois pas de code.
Si ce processus te convient, alors je te laisse le traduire en VBA.
Bien entendu, tu reviens si nécessaire en retournant ton code et en précisant le bug éventuellement rencontré.

[Bisbis27]

Menhir et marcelG merci pour vous aide

voila ce que j'obtiens, le mot de passe est "mdp" par contre j'ai besoin de votre aide car quand j'essaie décrire dans la plage de cellule F5:AN10, on me demande bien un mot de passe
mais le mot de passe "mdp" ne fonctionne pas,

Merci à vous

[Menhir]

voila ce que j'obtiens, le mot de passe est "mdp"

Peux-tu décrire exactement ce que tu as fais ?
Parce que, normalement, un mot de passe ne "s'obtient" pas, c'est à l'utilisateur de le fournir.

quand j'essaie décrire dans la plage de cellule F5:AN10, on me demande bien un mot de passe

Quand on essaye d'écrire sur une cellule verrouillée par une protection de feuille, Excel ne demande pas un mot de passe mais indique que la feuille est verrouillée.

Donc, je renouvelle la question : décris exactement et en détail ce que tu as fais.

[Bisbis27]

Bonjour,

désolé j'ai pas pu répondre avant parce que j'avais plus le fichier avec moi, du coup je te montre ce que j'ai fais
MATRICE ANALYSE TENDANCE .xlsm

Du coup quand je clique sur les cellules de la plage F5AN9, c'est bien verrouillé, on me demande un mot de passe, et lorsque j'entre le mot de passe que j'ai mis dans le code "mdp", ça ne fonctionne pas

et j'ai un autre soucis j'avais créée un bouton pour masquer les colonnes qui du coup ne fonctionne plus quand ces plages sont verrouillés

Merci pour votre aide

[MarcelG]

Bonjour Bisbis, Bonjour le Forum,

et j'ai un autre soucis j'avais créée un bouton pour masquer les colonnes qui du coup ne fonctionne plus quand ces plages sont verrouillés

C'est logique. La feuille est protégée.

Une notion, avec beaucoup d'autres, me reste certainement à aborder.
Je ne vois pas le code activant l'inputbox du mot de passe.

[Bisbis27]

Voila le code que j'avais fait pour verrouiller les cellules avec un mot de passe.
sauf que quand je clique sur les cellules F5 à AN9, il y a bien un mot de passe qui est demandé mais quand je rentre "mdp" ça ne fonctionne pas.

J'ai pas compris ta 2 ème phrase "Une notion avec beaucoup d'autres, me reste certainement à aborder"

Merci pour ta réponse

[MarcelG]

L'erreur est logique.
Voir plus haut la raison, et en déduire la méthode à utiliser pour y remédier.

Ce que je voulais dire.
Je ne vois pas de code Inputbox dans le projet VBA.
Peut-être as-tu utilisé la permission de modification des plages dans le ruban révision (dont, personnellement je ne me sers jamais).
Mais là ce n'est plus du VBA

[Bisbis27]

Dans un premier temps j'ai déverouiller toutes les cellules, en suite j'ai verouillé que la plage de donnée F5 AN9
Puis j'ai mis ce code dans le workbook




Pour l'erreur j'ai compris pourquoi tu dis que c'est logique, en faite si j'ai bien compris comme les cellules sont verrouillés, je ne peux pas masquer les colonnes.
Mais j'ai vraiment aucune idée de comment y remédier, c'est impossible non ?

[MarcelG]

Mais j'ai vraiment aucune idée de comment y remédier, c'est impossible non ?

Je me répète.
Les colonnes ne peuvent pas être masquées ou affichées si la feuille est protégée, donc....

[Bisbis27]

Je me répète.
Les colonnes ne peuvent pas être masquées ou affichées si la feuille est protégée, donc....

Donc il suffit d'ôter la protection ?