Bonjour,
As-tu respecté la chose ?
C'est à dire 'ScreenUpdating = False' en début de code, après éventuellement la déclaration des variables.
Public sub test()
Application.ScreenUpdating = False
'code
'code
Application.ScreenUpdating= True ' facultatif
End sub