OVH Cloud OVH Cloud

Calcul sur une colonne

4 réponses
Avatar
xem
Bonjour/soir à tout le groupe

J'ai une feuille avec 20906 lignes de données, il s'agit d'un tarif.
-en colonne C , les prix
- en colonne D , les références correspondantes à des familles
d'articles.
J'aimerais avec VBA, en colonne E afficher un prix calculé avec un coef.
spécifique à chaque références.
Exemple:
68 = coef (0.31) , 54 = coef (0.36)

C1 = 100 , le prix
D1 = 68 , la référence dont la valeur est 0.31
E1 = le résultat de 100 multiplié 0.31

C2 = 110 , le prix
D2 = 54 , la référence dont la valeur est 0.36
E2 = le résultat de 110 multiplié 0.36

C'est très compliqué pour moi, je
fait appel à vos compétences.
Merci d'avance
Xem

4 réponses

Avatar
Xav
Bonjour Xem

Sub Prix_net()

Dim i As Integer

For i = 2 To 20906

Select Case Cells(i, 4)

Case 68

Cells(i, 5) = Cells(i, 3) * 0.31

Case 54

Cells(i, 5) = Cells(i, 3) * 0.36

End Select

Next i


End Sub

Sinon, une autre méthode sans VBA consiste à créer une feuille de tes codes
remises avec leur pourcentage et de tapez la formule en E2 (puis la coller
sur toute la colonne)

Â*RECHERCHEV(D2;Remise!$A$2:$B$3;2;FAUX)
--
Cordialement

@+
Xav
"xem" a écrit dans le message de
news:
Bonjour/soir à tout le groupe

J'ai une feuille avec 20906 lignes de données, il s'agit d'un tarif.
-en colonne C , les prix
- en colonne D , les références correspondantes à des familles
d'articles.
J'aimerais avec VBA, en colonne E afficher un prix calculé avec un coef.
spécifique à chaque références.
Exemple:
68 = coef (0.31) , 54 = coef (0.36)

C1 = 100 , le prix
D1 = 68 , la référence dont la valeur est 0.31
E1 = le résultat de 100 multiplié 0.31

C2 = 110 , le prix
D2 = 54 , la référence dont la valeur est 0.36
E2 = le résultat de 110 multiplié 0.36

C'est très compliqué pour moi, je
fait appel à vos compétences.
Merci d'avance
Xem







Avatar
papou
Bonjour
Tu construis dans une zone à part un tableau avec une liste de tes
références dans une colonne et les coëfficients correspondants dans l'autre
colonne (à droite)
Tu nommes la plage des Références "LesRef" et la plage de coëfficients
"LesCoefs"
Dans ta cellule E, la formule
Á*(INDEX(LesCoefs;EQUIV(D1;LesRef;0)))

Cordialement
Pascal

"xem" a écrit dans le message de
news:
Bonjour/soir à tout le groupe

J'ai une feuille avec 20906 lignes de données, il s'agit d'un tarif.
-en colonne C , les prix
- en colonne D , les références correspondantes à des familles
d'articles.
J'aimerais avec VBA, en colonne E afficher un prix calculé avec un coef.
spécifique à chaque références.
Exemple:
68 = coef (0.31) , 54 = coef (0.36)

C1 = 100 , le prix
D1 = 68 , la référence dont la valeur est 0.31
E1 = le résultat de 100 multiplié 0.31

C2 = 110 , le prix
D2 = 54 , la référence dont la valeur est 0.36
E2 = le résultat de 110 multiplié 0.36

C'est très compliqué pour moi, je
fait appel à vos compétences.
Merci d'avance
Xem







Avatar
xem
Merci Xav et Papou
C'est parfait....mais j'ai 96 références
Dois-je passer par 96 conditions ou bien
existe-il une autre méthode avec VBA?

Xem

"papou" <cestpasbonpapou@çanonplus44.fr> a écrit dans le message de
news:%23VN$
Bonjour
Tu construis dans une zone à part un tableau avec une liste de tes
références dans une colonne et les coëfficients correspondants dans
l'autre

colonne (à droite)
Tu nommes la plage des Références "LesRef" et la plage de coëfficients
"LesCoefs"
Dans ta cellule E, la formule
Á*(INDEX(LesCoefs;EQUIV(D1;LesRef;0)))

Cordialement
Pascal

"xem" a écrit dans le message de
news:
Bonjour/soir à tout le groupe

J'ai une feuille avec 20906 lignes de données, il s'agit d'un tarif.
-en colonne C , les prix
- en colonne D , les références correspondantes à des familles
d'articles.
J'aimerais avec VBA, en colonne E afficher un prix calculé avec un coef.
spécifique à chaque références.
Exemple:
68 = coef (0.31) , 54 = coef (0.36)

C1 = 100 , le prix
D1 = 68 , la référence dont la valeur est 0.31
E1 = le résultat de 100 multiplié 0.31

C2 = 110 , le prix
D2 = 54 , la référence dont la valeur est 0.36
E2 = le résultat de 110 multiplié 0.36

C'est très compliqué pour moi, je
fait appel à vos compétences.
Merci d'avance
Xem











Avatar
papou
Re
Non, si tu construis le tableau intermédiaire tel que je te l'ai indiqué, tu
n'auras plus qu'à recopier ta formule telle quelle (il n'est pas question de
conditions) dans les cellules de ta colonne E.
Cordialement
Pascal

"xem" a écrit dans le message de
news:O$
Merci Xav et Papou
C'est parfait....mais j'ai 96 références
Dois-je passer par 96 conditions ou bien
existe-il une autre méthode avec VBA?

Xem

"papou" <cestpasbonpapou@çanonplus44.fr> a écrit dans le message de
news:%23VN$
Bonjour
Tu construis dans une zone à part un tableau avec une liste de tes
références dans une colonne et les coëfficients correspondants dans
l'autre

colonne (à droite)
Tu nommes la plage des Références "LesRef" et la plage de coëfficients
"LesCoefs"
Dans ta cellule E, la formule
Á*(INDEX(LesCoefs;EQUIV(D1;LesRef;0)))

Cordialement
Pascal

"xem" a écrit dans le message de
news:
Bonjour/soir à tout le groupe

J'ai une feuille avec 20906 lignes de données, il s'agit d'un tarif.
-en colonne C , les prix
- en colonne D , les références correspondantes à des familles
d'articles.
J'aimerais avec VBA, en colonne E afficher un prix calculé avec un
coef.



spécifique à chaque références.
Exemple:
68 = coef (0.31) , 54 = coef (0.36)

C1 = 100 , le prix
D1 = 68 , la référence dont la valeur est 0.31
E1 = le résultat de 100 multiplié 0.31

C2 = 110 , le prix
D2 = 54 , la référence dont la valeur est 0.36
E2 = le résultat de 110 multiplié 0.36

C'est très compliqué pour moi, je
fait appel à vos compétences.
Merci d'avance
Xem