attendre fin execution fonction

attendre fin execution fonction - VB/VBA/VBS - Programmation

Marsh Posté le 02-08-2006 à 22:15:03    

Salut à tous,
 
J'aimerais savoir comment faut faire pour que VBA attende la fin de l'éxécution d'une fonction avant de poursuivre le programme. Il faut ajouter un mot avant l'appel de chaque fonction mais je sais plus quoi.
 
Merci pour votre aide
 
++


Message édité par astano le 02-08-2006 à 22:15:36
Reply

Marsh Posté le 02-08-2006 à 22:15:03   

Reply

Marsh Posté le 02-08-2006 à 22:24:55    

DoEvents

Reply

Marsh Posté le 02-08-2006 à 23:06:38    

Ca ne semble pas fonctionner
DoEvents : Arrête momentanément l'exécution afin que le système d'exploitation puisse traiter d'autres événements.
 
 
En fait moi j'ai le code suivant
---
Instruction 1
Appel fonctionA
instruction 2
---
 
La fonctionA met plusieurs secondes à s'effectuer. Je veux que l'instruction 2 s'effectue que lorsque la FonctionA est terminée.
 
Merci pour votre aide


Message édité par astano le 02-08-2006 à 23:07:33
Reply

Marsh Posté le 02-08-2006 à 23:15:44    

ben, ya la méthode wait mais c'est un peu bourrin moi j'utilise ça pour l'exécution de programme asynchrone, c'est quoi cette fonction ?


Message édité par galopin01 le 02-08-2006 à 23:15:58
Reply

Marsh Posté le 02-08-2006 à 23:31:59    

C'est juste une fonction qui va afficher des infos dans un cellules pendant 3 secondes. Ca marche comment la fonction wait?
 
Mais il y a pas une instruction à mettre avant, ou à la place, du 'call', pour que le programme attende la fin de la fonction avant de continuer.
C'est un vieux souvenir de cours, donc je sais plus si j'ai revé ou si ca existe :)


Message édité par astano le 02-08-2006 à 23:32:24
Reply

Marsh Posté le 03-08-2006 à 17:39:13    

salut,
tu met une met variable publique que tu affecte à true quand tu lance ton prog
est sur le function qui attend tu fait une bouce genre
while pasfini=true
doevents
wend
la suite s'executera quand ta premiere fonction affectera false à pasfini

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed