'-- Général --- Dim Debut,Fin Dim ProgExt sub timer() if time(now) = Debut then ProgExt=shell("toto.exe") elseif time(now) = Fin then AppActivate ProgExt sendkeys "ALT + F4" end if end sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question