bonjour,

je vous explique mon problème. Je passe par différents userform pour la saisie des données. Puis je voudrais savoir comment faire pour effectuer les calculs dans mes userform et que les résultats s'affichent dans une feuille excel.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Private Sub CommandButton1_Click()
 
    hauteur2p.Hide
    point2.Show
 
End Sub
 
Private Sub CommandButton2_Click()
If TextBox34.Value = "" Or TextBox35.Value = "" Or TextBox36.Value = "" Or TextBox37.Value = "" Then
MsgBox "Il manque des informations."
Else
'je les mets ici???
 
hauteur2p.Hide
Sheets("calcul1").Select
End If
End Sub
 
'hst station 1
Private Sub TextBox34_Change()
 
End Sub
 
'hv station 1
Private Sub TextBox35_Change()
 
End Sub
 
'hst station 2
Private Sub TextBox36_Change()
 
End Sub
 
'hv station 2
Private Sub TextBox37_Change()
 
End Sub