Appeler un UserForm dans une boucle

Bonjour

Je suis novice en VBA et j'aimerai appeler un UserForm dans une boucle "For". A vrai dire, j'appelle une fonction dans ma boucle, et cette fonction apelle un nouvel UserForm
Mon code est le suivant :

Code:

---

1 2 3 4 5 6 7 8

For i = 1 to 10 Call Fonction1() Next i   Private Sub Fils() UserForm3.hide UserForm4.show End Sub

---

Merci d'avance !

Bonsoir Kalphyre,

Je ne suis pas un expert non plus mais plutot un novice qui apprend avec l'aide des différents forum.
Dans votre cas je pense que le mieux est de créer un nouveau module qui contiendras le code de la fonction à appeler dans la boucle.
Ensuite dans la boucle il faudrais faire la chose suivante:

Code:

---

1 2 3 4

For i = 1 to 10 call fils ou alors fils sans le call devant. Next i

---

Pour le module il faut le déterminer de la manière suivante:

Code:

---

1 2 3 4 5

Function Fils() UserForm3.hide UserForm4.show End Sub

---

Maintenant par rapport a ou poser les questions, il suffit simplement de creer dans le bon groupe de forum une nouvelle discussion, le bouton se trouve en haut ou en bas à gauche. On ne pose pas une question dans une discussion traitant d'un autre sujet.


Cordialement
Thibaut

Bonjour,

Une fonction retourne une valeur ou un tableau de valeurs mais n'est pas utilisée pour effectuer des actions. Pour ça, il faut utiliser une sub (procédure) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Sub Test()   Dim I As Integer   For I = 1 To 10   If UserForm1.Visible = False Then Ouvrir '...   Next I   End Sub   Sub Ouvrir()   UserForm1.Show   End Sub

---

Hervé.