VBA Excel 2007 Reouvrir fichier avertissement de sécurité

Dans Excel 2007, j'ai crée un fichier avec macro (VBA) et protégé workbook avec mot de passe

et pour éviter a la réouverture l'avertissement de sécurité lors la fermeture par icone rouge (X)

j'ai utilisé le code ci-dessous.

Étapes

1- pour éviter avertissement de sécurité a la réouverture le code ci-dessous (le problème est résolu)

2- fermeture par icone rouge (X)

3- Rouvrir le fichier

4- Enregistré mon travail

5- Fermé et r Rouvrir le fichier

6- le code fonctionne très bien

Mais le probleme reste a la fermeture d'utiliser le Gestionnaire des taches

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    ThisWorkbook.Unprotect Password:="blabla"
    ThisWorkbook.Save
    ThisWorkbook.Saved = True
End Sub

Private Sub Workbook_Open()
    ThisWorkbook.Protect Password:="blabla"
    ThisWorkbook.Save
    ThisWorkbook.Saved = True
End Sub  

Bonjour vbaexceltuto,

Ta demande serait-elle de trouver un moyen de trapper "CTRL+ALT+SUPPR" ?

merci GVIALLES a ta repondre, mais peut etre une coupure d'électricité

vbaexceltuto,

Une remarque: A partir du VBA, tu n'as pas la possibilité de gérer la totalité des évènements se produisant sur le poste de travail qui l'exécute. En particulier, l'évènement généré suite à l'appui des touches CTRL+ALT+SUPPR, est un évènement WINDOWS pas un évènement applicatif que l'on pourrait "trapper" au moyen de la méthode Application.Onkey.

Et d'ailleurs, il est plus que déconseillé de désactiver l'appel au gestionnaire des tâches Windows.

Pour la panne électrique (ou le scud qui explorerait le poste de travail ) la prévention devra venir d'autres dispositifs que le code VBA.