Application.ScreenUpdating
Résolu
Mirguy23
Messages postés
42
Statut
Membre
-
fabien25000 Messages postés 697 Statut Membre -
fabien25000 Messages postés 697 Statut Membre -
Bonjour tout le monde!!
Je viens de me rendre compte que : Application.ScreenUpdating = False cachait les traitements et certaines données sont y réelles. Mais comment l'utilise t-on? Où faut-il le mettre? quand? et on le laisse toujours à false?
Je vous remercie d'avance pour vos explications.
Voici un exemple d'un de cas où j'ai utilisé Application.ScreenUpdating:
Je viens de me rendre compte que : Application.ScreenUpdating = False cachait les traitements et certaines données sont y réelles. Mais comment l'utilise t-on? Où faut-il le mettre? quand? et on le laisse toujours à false?
Je vous remercie d'avance pour vos explications.
Voici un exemple d'un de cas où j'ai utilisé Application.ScreenUpdating:
Application.ScreenUpdating = False
Call CleanImports
shCommande.Activate
Rows("6:6").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Sort Key1:=Range("G6"), Order1:=xlAscending, _
Key2:=Range("E6"), Order2:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:=xlSortNormal
Selection.Sort Key1:=Range("A6"), Order1:=xlAscending, _
Key2:=Range("C6"), Order2:=xlAscending, _
Key3:=Range("B6"), Order3:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:=xlSortNormal
Call MakeSynthese
End Sub
1 réponse
Bonjour,
tu aurai pu continuer la conversation ici :
https://forums.commentcamarche.net/forum/affich-36056506-debogage-macro-absence-de-commande#p36070098 ...
à la fin de ton sub il suffit d'écrire
tu aurai pu continuer la conversation ici :
https://forums.commentcamarche.net/forum/affich-36056506-debogage-macro-absence-de-commande#p36070098 ...
à la fin de ton sub il suffit d'écrire
'... ton code Application.ScreenUpdating = True End Sub
Merci pour ton explication.
Donc à chaque que j'utilise Application.ScreenUpdating je dois le mettre à True avant le End Sub?
Je vous remercie encore de m'avoir aider !
pense à passer tes 2 sujets en résolu
bonne route