Protéger une feuille sans messages

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

lerogertroutman

XLDnaute Junior
Bonjour,

Je réalise une macro qui crée des tableaux type à remplir par les utilisateurs.
Je souhaite que la première ligne de mon tableau, qui contient les titres des colonnes, soit verrouillée, mais que le reste du tableau soit modifiable.

1- pour y parvenir, j'ai rendu non verrouillable l'ensemble des cellules de ma feuille avec :
Range(A1:ZZ10000).Locked = False
Puis j'ai ajouté dans ma macro une ligne qui déverrouille la feuille :
worksheet("Tableaux").Unprotect ("MonMotdePasse")
puis qui crée le tableau en ajoutant pour les cellules de la première ligne :
Selection.Locked = True
Puis une ligne à la fin de la macro pour vérouiller la feuille :
worksheet("Tableaux").Protect ("MonMotdePasse")

--> Cela fonctionne, mais est-ce la meilleure méthode ?

2- une fois mon tableau créé, si je clique sur une des cellules vérouillées, un MsgBox apparaît ("La cellule est protégée et en lecture seule. Pour modifier une cellule etc...").

--> Comment faire en sorte que ce message n'apparaisse pas, mais sans désactiver les messages d'alerte pour tout le document ?

Un grand merci pour votre aide 🙂

LeRogerTroutman
 
Re : Protéger une feuille sans messages

Bonjour lerogertroutman, chris et le forum,

Un exemple avec d'une part :

Une macro qui réalise le verrouillage de la première ligne et l'accès libre aux autres lignes. Mot de passe *** (trois étoiles). Sans bouton d'initialisation😉

D'autre part :

Une macro évènementielle placée dans le module de feuille déconnecte l'alerte sur la première ligne.🙂

Cordialement

Bernard
 

Pièces jointes

Re : Protéger une feuille sans messages

Salut Chris, TBernardT, Le forum,

Merci TBernardT, c'est précisément ce que je souhaitais faire.

Je vais tout de suite me plonger dons le code pour voir comment tu t'y es pris.

Un grand merci !

Le Roger 🙂

[EDIT] dslé pour le double post --> problème de connexion 🙄
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
9
Affichages
583
Retour