syntaxe pour une macro

[bpol]

Bonjour le Forum,

voici mon soucis je désirerais inclure à la fin d' une macro que :
après 1 minute elle continue ce qu'on lui demande.

c'est à dire:

exemple:

'And

after 1 minute

Range("A3") = Range("A3") + Range("L2")
Range("B4") = Range("B4") + Range("L1")
Range("A3").Select

'
End Sub


Merci

Bpol

 

[Pierrot93]

Re : syntaxe pour une macro

Bonjour bpol

le code ci-dessous marquera une pause de 1 minute dans le code :

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

bonne journée
@+

 

[bpol]

Re : syntaxe pour une macro

Bonjour Pierrot93,

Merci c'est c'est ce que je voulais qu'elle fasse
mais il y a un petit soucis c'est que la macro continue à fonctionner pendant la pause et bloque alors excel, je ne sais pas écrire pendant ce temps là.

Bpol

 

[Pierrot93]

Re : syntaxe pour une macro

Re

pour pouvoir intervenir sur la feuille, essaye comme ci-dessous :

Dim Pause As Integer, dep As Single
dep = Timer
Pause = 5
Do While Timer < dep + Pause
    DoEvents
Loop

@+

Edition : paus de 5 secondes à adapter

 

[bpol]

Re : syntaxe pour une macro

Merci Pierrot93