Appli.ScreenUdating=False ne fonctionne pas

Question

Bonjour,

En VBA Excel :
Je n'avais jusqu'à présent jamais eu de problème avec la commande
"Application.ScreenUpdating = False" qui cachait en arrière plan l'ouverture de nombreux fichiers par mes macros.

J'ai modifié un fichier qui fonctionnait en rajoutant une UserForm, et depuis je vois un scintillment :
malgré la commande "Application.ScreenUpdating = False" en début de macro, l'écran n'est pas gelé et l'effet est très désagréable pour l'utilisateur.

Une vérification dans la fenêtre Exécution, en plaçant un point d'arrêt quelques lignes après la commande "Application.ScreenUpdating = False", montre qu'effectivement sa valeur est à True ... Comment est-ce possible ?

Je ne pense pas que cela soit lié à mon ordi ou à mon application Excel puisque mes anciens fichiers gèlent correctement l'écran. Aurais-je modifié une configuration quelconque dans mon dernier fichier ? Est-ce lié à la UserForm (que j'ai testé en vbModeless aussi bien qu'en vbModal) ?

Merci de votre aide !
Céline

lermite222 · Answer

Bonjour,
Juste en dessous de la ligne 
Application.ScreenUpdating = False
tu ajoute
Application.EnableEvent = False
Pas oublier de la remettre à True quand Fini.
Explication probable
Dans les appels aux différente feuilles des routines événement doivent probablement être activées et sûrement que l'une d'entre-elle te remet ScreenUpdating à True

A+

cel92 · Answer

Merci, cela fonctionne, mais je ne comprends pas pourquoi :

Aucun évênement dans mon fichier excel ne contient de ScreenUpdating...

Je vais regarder attentivement les fichiers que j'ouvre ... 
mais ils sont ouverts bien plus loin dans la macro et je ne comprends pas pourquoi le test de 
?Application.ScreenUdating dans la fenêtre exécution montre qu'elle est à True, alors que je viens de la mettre à False.

lermite222 · Answer

L'appel ne se ferra pas dans une macro mais dans un événement de feuille comme 
Worksheet_SelectionChange(...)

pour suivre le code, tu metle curseur sur la ligne de code juste après ton ScreenUp..
Tu tape F9 . La ligne devrait se mettre en surbrlllance Brun
Avec le curseur dans la macro tu tape F5, le code devrait s'exécuter jusque la ligne marquée
Tu ne tape plus F5 pour continuer mais F8..F8..F8.. etc. pour avancé pas à pas et tu va bien tomber sur le problème.
Mais si ça fonctionne avec Event OFF faut l'enlever pour le test.

A+

cel92 · Answer

Je répète qu'aucun évênement de mon fichier n'implique le ScreenUpdating (ni True ni False).
J'ai également vérifié qu'aucun évênement des fichiers ouverts ne contient de ScreenUpdating (ni True ni False).

Je ne sais donc pas pourquoi rajouter un EnableEvents=False résoud mon problème : mystère.

Et le mystère énoncé dans ma question subsiste :

Une vérification dans la fenêtre Exécution, en plaçant un point d'arrêt la ligne suivant la commande "Application.ScreenUpdating = False", montre que sa valeur est à True ... Comment est-ce possible ?

Céline

cel92 · Answer

Bonjour,
qqn aurait-il une idée ?

lermite222 · Answer

EnableEvents empèche excel d'exécuter les macro d'événement de feuille.
Et tu a beau dire, une variable ne se remet pas à True toute seule....
Tu à fait le test de mon poste précédant ?
A+

Appli.ScreenUdating=False ne fonctionne pas

6 réponses

Discussions similaires

Newsletters