Arret de procedure - Excel VBA

Question

Bonjour,

Voilà mon probleme, je cose en VBA sous excel. Je lance des procédures, en faisant appel a leur nom :

sub start()
faire_tache1
faire_tache2
end sub

Dans faire_tache1, j'ai une clause "exit sub" qui me permet d'arreter le code, mais il me lance faire_tache2. Je voudrai en fait que si mon exit sub est executé, cela m'arrette le code pour toutes les procédures. Comprendesse ???

merki d'avance!

 :-p  :-p  :-p  :-p  :-p  :-p  :-p  :-p 
Nag
ICQ# : 132028600
msn = giraudnba@msn.com
 :-p  :-p  :-p  :-p  :-p  :-p  :-p  :-p

cs_Geff · Answer

YuP

La solution que je te popose se base sur des fonctions, voila comment tu peux procéder ::

Sub Start()

Dim Etat as boolean

Etat = Faire_tache1()
Si Etat Exit Sub
Faire_tache2

End Sub

Function Faire_Tache1() as Boolean
Dim Retour as Boolean

Retour=False
if int(rnd*10)>5 then Retour=True

Faire_Tache1=Retour

End Function

Voila tout :)
Have a Good Code

Geff  >:)

nagattaque · Answer

merki pour ton aide....

Ca marche c'est nikel

 :-p  :-p  :-p  :-p  :-p  :-p  :-p  :-p 
Nag
ICQ# : 132028600
msn = giraudnba@msn.com
 :-p  :-p  :-p  :-p  :-p  :-p  :-p  :-p

Arret de procedure - Excel VBA

2 réponses

Discussions similaires