Evenèment à l'ouverture de Personal

Bonjour,

Je cherche a écrire des procédures événementielles à chaque ouverture de mes fichiers excel selon qui en est l'auteur.

Pour cela j'ai écrit le code ci-dessous dans le fichier Personal mais celui semble interroger les propriétés du fichier Personal et non celui que j'ai décidé d'ouvrir. J'ai pour message d'erreur : Variable objet non définie (Erreur 91)

Faut-il écrire autre chose que : ActiveWorkbook ? une manière d'appeler le classeur appelant le persnnal ?

Private Sub Workbook_Open()
If ActiveWorkbook.BuiltinDocumentProperties(3) = "Ginga999" Then ActiveWorkbook.Close
End Sub

Je vous remercie par avance !

Bonjour,

Dans un premier temps, à ta place, je testerai ThisWorkbook à la place de ActiveWorkbook ...

En fait si je fais thisworkbook, cela ne vas t'il pas tester le fichier ou se situe le code ? c'est-à-dire Personal ?

En effet je n'ai plus d'erreur mais l'objectif est de tester le fichier de départ ouvert pas l'utilisateur (et qui ensuite ouvre le classeur Personnal).

Personal, le fichier excel qui se déclenche à chaque ouverture en caché.