Problème macro vérification de référence

Fermé
inasop - 10 sept. 2014 à 16:45
f894009 Messages postés 17268 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 29 mars 2025 - 10 sept. 2014 à 18:23
Bonjour,
Débutant sur VBA je demande votre secours
J'ai voulu faire une macro qui consistait en :
la colonne A contient des références
la colonne E d'autres référence
la macro est censé vérifier une ou plusieurs référence de la colonne A et présente dans la colonne B et ensuite me donner la quantité en poids qui est indiqué en colonne E
Le problème est que la quantité indiqué est toujours de 0...
Je ne m'en sors plus
je vous remercie pour votre aide


Voici ma macro

Dim Quantité
Quantité = 0


Sheets("Feuil3").Activate

For k = 1 To 450
For i = 1 To 450

If Range("A" & k).Value = Range("D" & i).Value Then
Quantité = Quantité + Range("E" & i).Value * Range("B" & i).Value

End If
Next i
Next k



Range("K2").Value = Quantité
MsgBox (Quantité & " Grammes")






A voir également:

1 réponse

f894009 Messages postés 17268 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 29 mars 2025 1 713
10 sept. 2014 à 18:23
Bonjour,

référence de la colonne A et présente dans la colonne B

oui mais,

If Range("A" & k).Value = Range("D" & i).Value Then 

ensuite

me donner la quantité en poids qui est indiqué en colonne E

et pourquoi cette operation si deja dans cellule E

Quantité = Quantité + Range("E" & i).Value * Range("B" & i).Value 

A+
0