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:
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.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub Workbook_Open() Application.Calculation = xlAutomatic End Sub
Pour ça j'utilise le déclencheur Workbook_Activate :
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 )/
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub Workbook_Activate() Application.Calculation = xlAutomatic End Sub
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![]()
Partager