Amusons-nous, juste pour voir et rigoler, à mettre ceci dans un module :
Public Sub titi()
If Application.VBE.ActiveVBProject.Mode > 0 Then Range("A1") = Range("A1")
Application.OnTime Now + TimeValue("00:00:01"), "titi"
End Sub
et ceci dans la sub workbook_open
Application.OnTime Now + TimeValue("00:00:00"), "titi"
Je te conseille de faire cette expérience dans un nouveau classeur, d'y insérer ce code, d'enregistrer, fermer, puis réouvrir le classeur pour voir ce qui arrive en tentant de passer en mode création.
Avant d'appliquer cela à ton vrai classeur (celui qui a d'autres protections en plus), invente-toi vite une méthode secrète pour arrêter ce mécanisme (il y en a plus d'une possible). Car si tu ne le fais pas, tu resteras bien évidemment dehors toi également.
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
28 avril 2015 à 17:00