Calcul avec textbox

Résolu
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

  • Votes
  • Date
  • Date décroissante
  1. 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)
    1. Merci beaucoup pour votre réponse, cela correspond parfaitement à ce que je voulais