Partager via

Propriété Application.ScreenUpdating (Excel)

  • Article

True si la mise à jour de l'écran est activée. Boolean (en lecture/écriture).

Syntaxe

expression.ScreenUpdating

expressionUne variable qui représente un objetApplication.

Remarques

Désactivez l'actualisation de l'écran pour accélérer l'exécution de votre code macro. Vous ne pourrez pas voir l'action de la macro, mais elle s'exécutera plus rapidement.

Une fois l'exécution de la macro terminée, songez à redéfinir la propriété ScreenUpdating sur True.

Exemple

Cet exemple illustre comment désactiver la mise à jour de l’écran peut accélérer l’exécution de votre code. L’exemple masque une colonne deux de Feuil1, tout en assurant le suivi du temps nécessaire pour le faire. La première fois que l’exemple masque les colonnes, la mise à jour de l’écran est activée ; la seconde fois, la mise à jour de l’écran est désactivée. Lorsque vous exécutez cet exemple, vous pouvez comparer les temps d’exécution respectifs qui s’affichent dans la zone de message.

Dim elapsedTime(2) 
Application.ScreenUpdating = True 
For i = 1 To 2 
 If i = 2 Then Application.ScreenUpdating = False 
 startTime = Time 
 Worksheets("Sheet1").Activate 
 For Each c In ActiveSheet.Columns 
 If c.Column Mod 2 = 0 Then 
 c.Hidden = True 
 End If 
 Next c 
 stopTime = Time 
 elapsedTime(i) = (stopTime - startTime) * 24 * 60 * 60 
Next i 
Application.ScreenUpdating = True 
MsgBox "Elapsed time, screen updating on: " & elapsedTime(1) & _ 
 " sec." & Chr(13) & _ 
 "Elapsed time, screen updating off: " & elapsedTime(2) & _ 
 " sec."

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.