Discussion :

[jerjou26]

Bonjour,

Je m'essaye au VBA et je ne comprends pas pourquoi Application.ScreenUpdating = False est en fait égal à True lorsque je survole la ligne en mode pas à pas (voir la copie d'écran jointe). Je confirme qu'il est bien True car lorsque j'execute le code je vois tout défiler. (J'ai bien remis = True avant le End Sub.)

Merci d'avance pour précieuse aide.

[jfontaine]

Bonjour,

Quand le curseur est sur une ligne de code, cette ligne ne c'est pas encore exécutée.
Normalement, ScreenUpdating sera False sur la ligne suivante

[jerjou26]

Merci pour la réponse, mais quand je passe a la ligne suivante c'est toujours = a true!

[gFZT82]

Bonjour,

Plutôt que l'info-bulles, essaie d'utiliser un espion pour visualiser l'état de Application.ScreenUpdating.

Cordialement.

[jerjou26]

Merci gFZT82,

Voir la copie écran jointe avec l'espion. Le ScreenUpdating est toujours = true.
Et c'est bizarre car en utilisant l'espion j'ai l'impression que c'est l'inverse qui se produit, c'est à dire:
quand le ScreenUpdating = False, l'espion indique true et inversement.
Je comprends pas!

[gFZT82]

J’ai effectué le test ci-dessous et j’obtiens des résultats cohérents avec l’espion, la fenêtre exécution et la boite message.
Par contre, l’info-bulle retourne un état « erroné ».

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub Test()
 
MsgBox "Etat initial => Application.scr = " & Application.ScreenUpdating
Debug.Print "Etat initial => Application.scr = " & Application.ScreenUpdating
 
Application.ScreenUpdating = False
MsgBox "1er Basculement => Application.scr = " & Application.ScreenUpdating
Debug.Print "1er Basculement => Application.scr = " & Application.ScreenUpdating
 
Application.ScreenUpdating = True
MsgBox "2eme Basculement => Application.scr = " & Application.ScreenUpdating
Debug.Print "2eme Basculement => Application.scr =" & Application.ScreenUpdating
 
End Sub

Pour l’info-bulle, je n'ai pas d'explication

Cordialement.

[jerjou26]

Merci gFZT82.

J'ai collé votre test dans mon code et contrairement à vous mon espion n'est ni cohérent avec les lignes de code ni avec les msgbox. voir copie jointe.

[jerjou26]

Bon, j'ai trouvé une piste:
J'ai supprimer tout les ScreenUpdate de mon code pour voir ce que ça faisait, et là j'ai vu que tout défilait.
Donc le ScreenUpdate fonctionne pour tout ce qui est du traitement des données (copier, coller, calculs etc...). Par contre je vois toujours les changements de sheet (ma question initiale), et je ne sais vraiment pas comment ne plus les voir.
Merci pour votre aide.
Cdlt