Comment proteger bases de données completees par un formula

Bonjour,

Voilà mon problème.

J'ai 4 bases de données qui se remplissent par l'intermédiaire d'un formulaire, mais si je protège les feuilles des BD pour que personne ne puisse y toucher, je ne peux pas accéder au formulaire par ces boutons d’appel.

Est-il possible d’ôter la protection des feuilles en cliquant sur leur bouton d’appel du formulaire, et remettre la protection en quittant le formulaire.

Je suis débutant en la matière, sur le net j’ai lu que l’on pouvait utiliser le code « unprotect » pour enlever la protection et le « protect » pur le remettre en quittant le forulaire, j’ai essayé mais sans résultat.

J’ai également copié ce code VBE dans le composant thisWorkbook

Private Sub Workbook_Open()

Sheets("OPPOSITIONS").Protect UserInterfaceOnly:=True 'OPPOSITIONS

End Sub

La problématique comment cliquer sur le bouton du formulaire et Ôter puis remettre la protection en quittant le formulaire.

Merci de votre aide et bonne journée

J’ai joins le fichier certainement plus explicite que mon exposé.

PITROU

24protection2.zip (241.14 Ko)

Bonjour

En protégeant les feuilles à l'ouverture du fichier (voir le module ThisWorkbook)

Ta page "OPPOSITIONS" n'avait pas les cellules verrouilées (Format de cellule ---> Onglet protection)

Je n'ai testé que cette page "OPPOSITIONS"

A dire

Merci Banzai64 pour ton aide,

Mon remerciement est un peu tardive car je travaillais,

Merci infiniment............

PITROU

Rechercher des sujets similaires à "comment proteger bases donnees completees formula"