Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

La protection d'une feuille possible avec du VBA ?

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 !

Olivier GUILLOT

XLDnaute Nouveau
Bonjour,

J'ai récupéré une macro permettant de protéger l'accès à une feuille par un mot de passe.

Ayant développé une feuille dont je ne souhaite pas que l'utilisateur puisse modifier les formules, j'ai protégé la feuille.

Mais alors, la macro ne fonctionne plus et cela provient de la protection de la feuille.

Ayant aucune connaissance en VBA, quelqu'un pourrait m'apporter ses lumière à ce sujet.

Dans le fichier ci joint, le mot de passe correspond au nom de la feuille + x (MB x)

Dans le fichier :
- la feuille MB est protégée : la macro rencontre un bug sur la fonction row....
- les feuilles JF et DT ne sont pas protégées : la macro fonctionne correctement

MErci pour votre aide
 

Pièces jointes

Bonjour,

Il suffit de unprotect la feuille avant de l'éditer avec votre macro.

Dans votre cas il suffit de rajouter :


VB:
Unload Me

ActiveSheet.Unprotect "password"

Rows("1:" & Rows.Count).EntireRow.Hidden = False

ActiveSheet.Protect "password"

Bonne journée
 
Merci Jauster de cette réponse si rapide.

Cette fois ci, le bug porte sur la ligne suivante ;

DerLig = Sheets(Feuille_quittée).Cells.SpecialCells(xlCellTypeLastCell).Row

j'ai modifié le mdp en "x"

Merci de ton aide
 

Pièces jointes

Bonsoir le fil, le forum

@Olivier GUILLOT
Bonjour,
Ayant aucune connaissance en VBA, quelqu'un pourrait m'apporter ses lumière à ce sujet.
Voici une lumière sur un point à ne pas oublier.
La protection offerte par Excel est illusoire et facilement contournable en moins de 15 secondes.
(17 secondes les jours de pluie)

NB: Les moyens de faire "sauter les verrous" sont légion sur le World Wide Web.
Il suffit d'utiliser n'importe quel moteur de recherche avec les mots-clés idoines.
 
- 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
17
Affichages
275
Réponses
8
Affichages
487
Réponses
2
Affichages
480
Réponses
5
Affichages
735
Compte Supprimé 979
C
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…