[Excel/VBA] Recommencer une procédure

Gilou -  
 Major -
Bonsoir,


Voilà, grâce à l'un de vous j'ai pu inclure dans mon projet vba une procédure pour tirer un chiffre aléatoirement. Les lignes en question sont dans un UserForm

Seulement, je voudrais que dans certaines conditions, les "dés" soient relancés à nouveau (retirer au sort). J'utilise la fonction IF ELSE pour cela.

Mais comment puis-je dire en langage vb "Si ceci Alors ON RECOMMENCE LA PROCEDURE SUB EN COURS DEPUIS LE DEBUT" ?

Merci
Gilou
A voir également:

1 réponse

Réponse 1 / 1
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
Tu ne donne aucune info sur ton code, alors voila un exemple qui n'affichera jamais le 5 
Private Sub UserForm_Click()
Reco:
    If TireDes() = 5 Then GoTo Reco
End Sub

Function TireDes() As Integer
Dim N As Integer
    Randomize Timer
    TireDes = Int(Rnd * 5) + 1
End Function

A+
2
Major
 
Domo arigato !!!
0