Discussion :

[linkcr15]

Bonjour a tous!

Voila j'aimerais interrompre l’exécution de mon code sous certaine condition pour afficher un UserForm qui permet à l'utilisateur de choisir une date pour la rajouter dans un tableau. Une fois que l'utilisateur à choisit sa date et que la macro d'ajout est terminée, je souhaite reprendre mon code là où je m'étais arrêté.

Est-ce que cela est possible svp?

[jfontaine]

Bonjour,

Est-ce que cela est possible svp?

oui c'est possible

Mais était-ce vraiment ça la question ?

[linkcr15]

Mais était-ce vraiment ça la question ?

Non, et voici la question sous-entendue :
Comment on fait?

Je pensais pas à avoir à la développer mais bon...

[jackborogar]

Peut-être peux tu nous envoyé ton code, sinon :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
sub attente 
 
UserFormPause.show 
do while ValPause = 1 
doevents 
loop 
 
exit sub

[linkcr15]

Et bien en fait je n'ai pas de code pour le moment, seulement un If sans corps à l'intérieur.

Tu peux me dire à quoi correspond ton ValPose stp?

[jfontaine]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If macondition
 
    MaUseformDate.Show      
 
end if

L'appel de la userform bloquera le code jusqu'a la sortie de cette dernière

[linkcr15]

jfontaine, l'appel au UserForm ne bloque pas le code, le UserForm s'affiche mais le code continue de s'éxécuter.

jackborogar m'a donné la bonne solution, il fallait juste trouvé la condition pour le loop et pour moi c'était la visibilité du UserForm, ainsi voici mon code final :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
If possible = False Then
    Usr_Creer.Show 0
    Do While Usr_Creer.Visible = True
    DoEvents
    Loop
End If

Merci à vous deux pour votre aide