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
Configuration: Windows XP
Internet Explorer 6.0

3 réponses

  1. 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
  2. icare42 Messages postés 15 Statut Membre 1
     
    Merci beaucoup pour votre réponse, cela correspond parfaitement à ce que je voulais
    0
  3. Polux31 Messages postés 7219 Statut Membre 1 204
     
    De rien

    Bonne continuation.

    ;o)
    0