Bonjour,

Pourriez vous m'aider svp, j'ai un problème lors de la première exécution de ma macro ca m'affiche Erreur d'exécution '13'
Je dois rentrer des chiffres dans mes TextBox mais il ne les prend pas en compte !
Voila le bout de mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private Sub CommandButton1_Click()              'Bouton de l'UserForm
Call Simulation
Call Copy_First
Unload Me
End Sub
 
Public Sub Copy_First()
Dim Up, Down As Single
Up = UserForm1.TextBox2.Value / 100
Down = UserForm1.TextBox3.Value / 100    'Les 2 valeurs reste à zéro lors de la première exécution
Merci d'avance,