Bonjour,

Je diffuse un fichier via une GPO sur le pc de plusieurs utilisateurs.

Je souhaite que dans ce fichier l'option de calcul "Automatique" reste bloquée.

Pour cela je procède de la façon suivante :

Dans un premier temps j'active l'option de calcul automatique à l'ouverture du classeur:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub Workbook_Open()
    Application.Calculation = xlAutomatic
End Sub
Dans un second temps je veux que, à chaque fois que l'utilisateur clique dans le fichier, l'option de calcul automatique s'enclenche, afin que l'utilisateur ne puisse pas la passer en manuel.

Pour ça j'utilise le déclencheur Workbook_Activate :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Private Sub Workbook_Activate()
    Application.Calculation = xlAutomatic
End Sub
Cette façon de faire a marché un temps, et pour un raison qui m'est inconnue la sub Workbook_Activate ne semble plus fonctionner ( je ne saurais pas dire depuis quand, je m'en suis aperçu ce matin )/

Pour information ces deux déclencheurs sont situés dans ThisWorkbook et je travaille sur la version 2205 d'excel.

Est-ce que quelqu'un saurait pourquoi ça ne marche plus, ou le cas échéant s'il n'y a pas une autre façon d'arriver au résultat escompté ?

Merci d'avance