Discussion :

[stephadm]

Bonjour au forum,

Dans un userform se trouvent plusieurs textbox et combobox alignés par colonnes et par lignes et sont tous cachés sauf la première ligne.

Ce que je souhaite effectuer avec ce formulaire :
Aperçu en gros de l'UserForm
ComboboxCat ComboboxArt TextBoxInfArt TextBoxPU ComboboxMarge TextBoxVte
ComboboxCat1 ComboboxArt1 TextBoxInfArt1 TextBoxPU1 ComboboxMarge1 TextBoxVte1
ComboboxCat2 ComboboxArt2 TextBoxInfArt2 TextBoxPU2 ComboboxMarge2 TextBoxVte2
ComboboxCat3 ComboboxArt3 TextBoxInfArt3 TextBoxPU3 ComboboxMarge3 TextBoxVte3
...
...
ComboboxCat20 ComboboxArt20 TextBoxInfArt20 TextBoxPU20 ComboboxMarge20 TextBoxVte20

TextBoxTotauxPU TextBoxTotauxVte

calcul de la 1ère ligne,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
TextBoxVte.value=Val(TextBoxPU) * Val(ComboboxMarge)
TextBoxTotauxPU = Val(TextBoxPU)+Val(TextBoxPU1)+Val(TextBoxPU2)+...+Val(TextBoxPU20)
TextBoxTotauxVte=Val(TextBoxVte)+Val(TextBoxVte1)+Val(TextBoxVte2)+...+Val(TextBoxVte20)

dès que TextBoxPU change la 2è ligne s'affiche et effectue le même calcul

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
TextBoxVte1.value=Val(TextBoxPU1) * Val(ComboboxMarge1)
 
TextBoxTotauxPU = Val(TextBoxPU)+Val(TextBoxPU1)+Val(TextBoxPU2)+...+Val(TextBoxPU20)
TextBoxTotauxVte=Val(TextBoxVte)+Val(TextBoxVte1)+Val(TextBoxVte2)+...+Val(TextBoxVte20)

dès que TextBoxPU1 change la 3è ligne s'affiche et effectue le même calcul

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
TextBoxVte2.value=Val(TextBoxPU2) * Val(ComboboxMarge2)
 
TextBoxTotauxPU = Val(TextBoxPU)+Val(TextBoxPU1)+Val(TextBoxPU2)+...+Val(TextBoxPU20)
TextBoxTotauxVte=Val(TextBoxVte)+Val(TextBoxVte1)+Val(TextBoxVte2)+...+Val(TextBoxVte20)

,etc. jusqu'à la 20è lignes

Comment simplifier ?
Les TextBoxTotauxPU TextBoxTotauxVte cumulent au fur et à mesures de l'apparition des lignes.

Merci pour votre aide

Stephanie

[stephadm]

Bonjour au forum,

J'ai changé de façon de faire car trop compliqué.

La suite de creation de mon fichier, se trouve http://www.developpez.net/forums/d12...n/#post6843760

Merci au forum

Stephanie