Bonjour,
ton deuxième fichier est assez différent du premier, en revanche, je ne comprends pas cette logique de tirage au sort, surtout que ton formulaire est initialisé un peu n'importe comment je trouve, il va chercher des informations dans des colonnes qui n'ont même pas d'en têtes, et qui n'en contiendront pas visiblement, je parle de l'initialisation de la plupart des Textbox qui vont chercher des données au delà de la colonne 6:
If Ligne > -1 Then TextBox7.Text = Cells(Ligne + 4, 9)
If Ligne > -1 Then TextBox8.Text = Cells(Ligne + 4, 10)
If Ligne > -1 Then TextBox9.Text = Cells(Ligne + 4, 11)
If Ligne > -1 Then TextBox10.Text = Cells(Ligne + 4, 7)
If Ligne > -1 Then TextBox11.Text = Cells(Ligne + 4, 8)
qui est d'ailleurs mal écrit aussi :
If Ligne > -1 Then
TextBox1.Text = Cells(Ligne + 4, 4)
TextBox2.Text = Cells(Ligne + 4, 6)
TextBox7.Text = Cells(Ligne + 4, 9)
TextBox8.Text = Cells(Ligne + 4, 10)
TextBox9.Text = Cells(Ligne + 4, 11)
TextBox10.Text = Cells(Ligne + 4, 7)
TextBox11.Text = Cells(Ligne + 4, 8)
end if
idem pour ça qui est mal écrit:
Me.TextBox5.Value = ListBox1.Value
Me.TextBox6.Value = TextBox2.Value
donne :
TextBox5 = ListBox1
TextBox6 = TextBox2
.value c'est utile quand on utilise un with sur un contrôle dont on veut utiliser la valeur msgbox(textbox5) donnera la même chose que msgbox(textbox5.value) ou que msgbox(me.textbox5.value)
Pour revenir au tirage au sort, où se trouve-t-il? je n'ai vu aucune macro de tirage au sort, et à chaque fois que je lance le formulaire, c'est toujours le même match qui est sélectionné.
Si tu veux une vraie macro de tirage au sort, je peux t'en faire une, mais ça ce n'en n'est pas un visiblement, à moins que tu ne me montres pas le bon fichier...