arrer une macro qui à été lancé avec un ontime

T

Theze

XLDnaute Occasionnel

• 29 Octobre 2012

• #2

Re : arrer une macro qui à été lancé avec un ontime

Bonsoir,

C'est le problème quand on ne demande pas la déclaration explicite des variables 😱( ("Option Explicit" en tête de module, cocher la case "Déclaration des variables obligatoire" dans "Outils" > "Option..." onglet "Editeur"). Ta variable "Depart" est = à rien dans "StopOnTime_copiefichier" puisqu'elle n'a pas de portée "Module".
Essai ces quelques lignes de code et regarde ce qui se passe en A1 :

Code:

Dim Depart As Date

Sub OnTime_copiefichier()

    Depart = Now + TimeValue("00:00:01")
    CopierFichier
    Application.OnTime Depart, "OnTime_copiefichier"
    
End Sub

Sub StopOnTime_copiefichier()

On Error Resume Next
Application.OnTime Depart, "OnTime_copiefichier", , False

End Sub

Sub CopierFichier()

    Range("A1") = Format(Depart, "hh:mn:ss")
    
End Sub

Hervé.

 

Vote positif 0 Vote négatif

M

moupa

XLDnaute Junior

• 30 Octobre 2012

• #3

Re : arrer une macro qui à été lancé avec un ontime

bonjour Hervé

Bon ben j'ai encore quelques progrès à faire🙁
je regarde et test dans la journée ton message.
merci pour ton aide
pascal

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 30 Octobre 2012

• #4

Re : arrer une macro qui à été lancé avec un ontime

Bonjour,

regarde peut être cet article de notre ami Didier🙂 sur la méthode "ontime" :
Tutoriels : myDearFriend! Excel Pages
bonne journée
@+

 

Vote positif 0 Vote négatif

M

moupa

XLDnaute Junior

• 30 Octobre 2012

• #5

Re : arrer une macro qui à été lancé avec un ontime

Bonsoir le forum,

Ça fonctionne.🙂
Merci à vous pour votre aide et conseil
pascal

 

Vote positif 0 Vote négatif