XL 2019 chenillard programmable excel vba

[valouf]

Bonsoir je cherche un code qui va me permettre d'allumer au bout de 2 s "a1" puis 2 s apres "a2" juqu'a a"500" merci d'avance

 

[sylvanu]

Bonsoir Valouf,
Un exemple en PJ qui utilise :

Application.Wait (Now + TimeValue("00:00:02"))

Mais XL est bloqué pendant le déroulement de la macro.

 

[blord]

Bonjour,
500 cellules à 2 secondes par cellule donne 1000 secondes de traitement.
1000/60 = +/- 15 minutes
L'utilisateur attendra donc 15 minutes avant la fin du traitement...
Je ne sais pas si dans votre cas c'est acceptable ou non...

 

[valouf]

merci bcp pour vos reponses

 

[Modeste geedee]

Bonsour®

Bonsoir Valouf,
Un exemple en PJ qui utilise :

Application.Wait (Now + TimeValue("00:00:02"))

Mais XL est bloqué pendant le déroulement de la macro.

au lieu de Application.Wait
utiliser Application.OnTime(Now+timevalue("00:00:02"),"DecalerCible")

 

[job75]

Bonsoir,

Très classique aussi :

t = Timer + 2 'temporisation 2 secondes
While Timer < t And t < 86400: DoEvents: Wend

Bonne nuit.