Calcul somme userform

Résolu
juer31 Messages postés 114 Date d'inscription   Statut Membre Dernière intervention   -  
juer31 Messages postés 114 Date d'inscription   Statut Membre Dernière intervention   -

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

A voir également:

2 réponses

cousinhub29 Messages postés 1074 Date d'inscription   Statut Membre Dernière intervention   361
 

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


1
juer31 Messages postés 114 Date d'inscription   Statut Membre Dernière intervention   6
 

Merci pour l'aide.

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

Merci

0