Salut,
Je viens de trouver ce code dans un ancien topic.
Question: à quoi sert le !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub Pause(Optional P! = 0.05) D! = Timer: F! = D + P: Application.ScreenRefresh While Timer < F If Timer < D Then F = F - 86400: D = 0 Wend End Sub
Partager