Calcul avec textbox

Résolu
icare42 Messages postés 15 Statut Membre -  
Polux31 Messages postés 7219 Statut Membre -
Bonjour,
Je travaille sous word et je souhaiterais utiliser le résultat d'une textbox placée dans une userform afin d'effectuer des calculs dans une fonction qui n'est pas forcément située dans le même module.
Je souhaiterais savoir comment faire.
Merci de votre aide et de votre temps
A voir également:

3 réponses

Polux31 Messages postés 7219 Statut Membre 1 204
 
Bonjour,

Il faut passer le contenu du Textbox en paramètre à la fonction qui calcul.
Voilà un exemple :

'UserForm1

Private Sub cmdCalcul_Click()
Dim res As Double
   
   res = ModCalcul.CalculMontantTTC(CDbl(Me.TextBox1.Text))

   MsgBox res

End Sub


Dans un module nommé "ModCalcul"
'ModCalcul
Option Explicit

Public Function CalculMontantTTC(ByVal montantHT As Double) As Double
   CalculMontantTTC = montantHT + ((montantHT * 19.6)/100)
End Function


;o)
0
icare42 Messages postés 15 Statut Membre 1
 
Merci beaucoup pour votre réponse, cela correspond parfaitement à ce que je voulais
0
Polux31 Messages postés 7219 Statut Membre 1 204
 
De rien

Bonne continuation.

;o)
0