Bonjour,
Je cherche à réaliser la chose suivante :
Lors du renseignement d'un premier Userform avec deux textbox, je souhaite récupérer la différence de ces deux données pour l'afficher lors de l'ouverture du second userform.
Pour cela j'ai défini une variable public dans un module
Dans la validation de mon premier userform j'ai le text suivant :
Et lors de l'initialisation du second Userform j'ai le text suivant :
Est ce qu'une personne pourrait me mettre sur la voie ?
Enfin j'ai une seconde question. Est il possible de fermer le premier Userform sans pour cela perdre la donnée "Difference".
Vous remerciant pas avance.
Je cherche à réaliser la chose suivante :
Lors du renseignement d'un premier Userform avec deux textbox, je souhaite récupérer la différence de ces deux données pour l'afficher lors de l'ouverture du second userform.
Pour cela j'ai défini une variable public dans un module
Code:
Dim difference as long
Dans la validation de mon premier userform j'ai le text suivant :
Code:
Private Sub CommandButton1_Click()
i = 2 ' Nombre de Text box de même nom
For J = 1 To i
If Me.Controls("TextBox" & J) = "" Then
MsgBox "La ligne " & J & " n'est pas renseignée"
End If
Next
Difference = (Val(TextBox2.Text) - Val(TextBox1.Text)) / 10
UserForm9.Show
End Sub
Et lors de l'initialisation du second Userform j'ai le text suivant :
Code:
Private Sub UserForm_Initialize()
TextBox1 = Difference
End Sub
Est ce qu'une personne pourrait me mettre sur la voie ?
Enfin j'ai une seconde question. Est il possible de fermer le premier Userform sans pour cela perdre la donnée "Difference".
Vous remerciant pas avance.