Protection feuille excel Résolu

Question

Bonjour, 


Je me permets d'ouvrir ce fil même s'il est en lien avec un autre résolu. Pardonnez-moi si j'ai mal fait. 

J'ai voulu mettre une protection dans mes bases de données constituées grâce à ce formulaire https://www.cjoint.com/?3FswUwfAaOZ  que via55 a eu la grande bienfaisance de m'offrir, mais voilà quand la base de donnée est protégée le formulaire n'arrive plus à y rentrer des données, ni à les retirer d'ailleurs. 

 J'aurais éventuellement deux « petites » demandes 

1*) Est-ce que ce serait possible de rajouter une macro dans la feuille pour passer outre la protection et permettre par le formulaire de rajouter ou de supprimer des éléments dans la BDD ? 
2) J'aimerai que dans la feuille BDD les colonnes NOM, Prénom, Matricule, Sexe, Date Naissance, Date d'entrée, Fonction, Affectation, Statut ne soient pas protégées. 

Merci beaucoup de vous pencher sur mes demandes 

Cordialement


Configuration: Windows 7 / Safari 5.1.7

Mike-31 · Answer

Bonjour,

Envoi un petit message privé à Via55 (que je salue) avec le lien de cette discussion pour attirer son attention
il lui sera plus facile d'intervenir sur un fichier qu'il connait, à défaut d'une réponse de sa part on regardera plus tard

julia Namor · Answer

Ok Mike-31 , je lui ai envoyé un message privé

j'ai trouvé sur un forum qu'il fallait mettre 
 ActiveSheet.Unprotect ("mot de passe") en début de macro 
puis mettre  ActiveSheet.Protect ("mot de passe") en fin de macro. 
Mais je ne sais pas sur quelle macro l'appliquer et ou dans la macro. 

Bien cordialement

Mike-31 · Answer

Re,

Par correction, attendons un peu le retour de Via55 et on voit plus tard

julia Namor · Answer

Bonjour à toutes et à tous 
 
Je me (re) permets de vous relancer suite à mon souci concernant la protection de l'UF .
 Via55 n'étant certainement pas disponible  , je vous soumets à nouveau  ma demande (ci dessus ). 
Merci énormément de m'aider

eriiic · Answer

Bonjour,

j'ai trouvé sur un forum qu'il fallait mettre
ActiveSheet.Unprotect ("mot de passe") en début de macro
puis mettre ActiveSheet.Protect ("mot de passe") en fin de macro.
Mais je ne sais pas sur quelle macro l'appliquer et ou dans la macro. 
Au début et à la fin de chaque macro écrivant sur la feuille, celles qui te génèrent le message d'erreur.

Sinon tu peux aussi faire ainsi :
Private Sub Workbook_Open()
    Sheets("Feuil1").Protect Password:="mot_de_passe", UserInterfaceOnly:=True
End Sub
A mettre dans ThisWorkbook.
Ta feuille est protégée pour les utilisateurs mais pas pour les macros. Et comme c'est dans Open tu ne peux pas oublier de le remettre.
Par contre je te déconseille de mettre un mot de passe. Celui qui veut pourra le faire sauter, et si tu l'oublies tu seras embêtée.

eric

julia Namor · Answer

Bonjour 
Merci eric
j'ai mis  donc 

Private Sub Workbook_Open()
    Sheets("Feuil1").Protect Password:="mot_de_passe", UserInterfaceOnly:=True
End Sub

Mais à l'ouverture il me marque "nom ambigu détecté"

Je devrais pas mettre quelque chose dans la parenthése ? Private Sub Workbook_Open(???????)

Cordialement

julia Namor · Answer

Oup's autant pour moi 

j'avais copié deux fois la syntaxe Private Sub Workbook_Open()
ça marche 
 
Les feuilles sont protégées sauf pour les macros . 

Par contre est que c'est possible de déprotéger en permanence quelques colonnes dans la BDD?
Merci

julia Namor · Answer

Merci eric 
j'ai honte 
c'était pourtant bien évident; 
en tout cas merci d'avoir réglé mon probléme 
 Bien cordialement

Protection feuille excel

8 réponses

Newsletters