Bonjour,

Je voudrais afficher un message à l'utilisateur tout en continuant l'exécution du code.
Comment faire?
Dans mon code ci-dessous l'utilisateur est averti que la 1/2 du temps est passée, mais tant qu'il n'a pas cliqué OK l'éxécution code ne continue pas.

Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
alarmDansMin  = Trim ( InputBox( "Dans combien de minutes l'alarme?", , "40") )
alarmDansmmsec = alarmDansMin*60*1000
 
WScript.sleep  alarmDansmmsec/2
 
MsgBox "Reste " & alarmDansMin/2 & "minutes !"
 
WScript.sleep  alarmDansmmsec/2
 
MsgBox "FINI"