Discussion :

[vincentche1]

Bonjour,
je souhaite incrémenter la variable score1 ci dessous avec le résultat de mon tirage aléatoire précédent or les 2 textbox que j'affiche affichent la meme valeur, quelle est mon erreur svp ? (je débute en vba)

Code :

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

1
2
3
4
5
6
7
8
nombre1 = Int((6 - 1 + 1) * Rnd + 1) // génére nbr aléatoire
UserForm1.TextBox1.Value = nombre1 // le colle dans une fenetre
 
If UserForm1.TextBox1.Value = "" Then
score1 = 0
Else: score1 = score1 + CInt(UserForm1.TextBox1.Text)
UserForm1.TextBox3.Value = score1
End If

[edelweisseric]

Bonjour à toutes et tous
Bonjour vincentche1

Essaie de déclarer la variable :

Code :

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

public score1 as integer

dans un module

Eric