Déverouiller des cellules

Résolu/Fermé
Signaler
-
 Freddddd -
Bonjour,

J'ai verrouiller certaines cellules dans ma feuille Excel, car je ne veux pas que l'utilisateur puisse les modifier. En fait, ces cellules font apparaître des résultats après que l'utilisateur ait entrer des données ailleurs.

J'ai donc verrouiller la feuille en permettant seulement à l'utilisateur de :
"Sélectionner les cellules déverrouillées"

Cependant, j'ai ajouter un bouton contrôle-X qui sert à effacer toutes les données.

Je me demandais s'il y avait un moyen de déverrouiller les cellules dans le code et les reverrouiller à la fin.

J'ai mis ceci au début et à la fin du code, mais ça bug :

Range("N14:N19").Select
Selection.Locked = False

Range("N14:N19").Select
Selection.Locked = True

Des idées?

Merci

2 réponses

Messages postés
16118
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
29 novembre 2021
1 563
Bonjour,

mais ça bug : et avec un peu plus de detail ca donne quoi??????

Chose principale, la feuille doit etre proteger pour que ca verrouille/deverrouille
Bonjour,

J'ai finalement réussi à trouver. Je n'ai eu qu'à ajouter cette ligne au début:

ActiveSheet.Unprotect

et celle-ci à la fin :

ActiveSheet.Protect

Merci pour votre aide,