Feuille protégée - grouper/dégrouper et cellules verrouillées

  • Initiateur de la discussion Initiateur de la discussion Tchico
  • Date de début Date de début

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 !

Tchico

XLDnaute Nouveau
Bonjour tout le monde,

Je souhaiterais pouvoir protéger une feuille (notamment impossibilité de visualiser certaines colonnes et certaines formules) en pouvant ouvrir grouper/dégrouper.
Si j'utilise "protection de la feuille", je peux bloquer les colonnes et les formules ainsi que grouper/dégrouper et si je mets le code suivant comme indiquer dans le forum
Private Sub Workbook_Open()
With Worksheets("R1")
.EnableAutoFilter = True
.EnableOutlining = True
.Protect Contents:=True, Password:="duer", UserInterfaceOnly:=True
End With
End Sub
Rien n'est bloqué.
Qui peut m'aider ? Je joins le fichier.
Merci d'avance.
 

Pièces jointes

Re : Feuille protégée - grouper/dégrouper et cellules verrouillées

Re,

IL faut faire Alt+F11 sélectionner le code qui apparaît le couper puis dans la fenêtre au-dessus à gauche vous verrez Thisworkbook double cliquez dessus puis coller le code là ou vous l'avez pris. Ensuite, fermer le classeur en l'enregistrant bien sur. 🙂
Et en le relançant, le code s'activera car c'est Thisworkbook_open.
Voilà.

A +
 
Re : Feuille protégée - grouper/dégrouper et cellules verrouillées

Re,

Alt+F11 puis dans le menu Outils sélectionner Propriété de VBAProjet puis onglet Protection taper un mot de passe et cocher Verrouillez le projet. 🙂

Mais cela pour excel 2007, je ne connais pas votre version.

Edit: mais il faut savoir que ce n'est qu'une protection fictive pour un utilisateur avertit.

A +
 
- 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
2
Affichages
1 K
Retour