Calcul somme userform Résolu

Question

Bonjour,

J'ai une userform sur laquelle je fais le "calculsomme" de 2 textbox.

total1 = qte1*coutant1

Me.TOTAL1.Value = (Val(Replace(Me.QTE1, ",", ".")) * Val(Replace(Me.COUTANT1, ",", "."))) / (((100 - (Val(Replace(Me.MARGE, ",", ".")))) / 100))

J'aimerais savoir s'il y a moyen de faire le VBA pour dire de faire la somme dans chaque textbox "total"

somme total2 = qte2*coutant2

somme total3 =...... ect.

Merci de m'aider

Windows / Chrome 129.0.0.0

cousinhub29 · Answer

Bonjour,

Sans filets

Supposant

- tous tes TxtBox sont numérotés identiquement (1, 2, ...)
- le TxtBox "Marge" est unique

A adapter selon le nombre :

For I = 1 To 3 'nombre à adapter
    Me.Controls("TOTAL" & I).Value = (Val(Replace(Me.Controls("QTE" & I), ",", ".")) * Val(Replace(Me.Controls("COUTANT" & I), ",", "."))) / (((100 - (Val(Replace(Me.MARGE, ",", ".")))) / 100))
Next I

Bonne journée

juer31 · Answer

Merci pour l'aide.

Je n'utilise pas souvent du codage et je ne voyais plus la solution.

Merci

Calcul somme userform

2 réponses

Votre réponse

Discussions similaires