Recherche et addition de membre sous VBA
rootsman34
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Voici le problème:
Sous VBA avec Excels; j'ai un tableau avec des dates dans une colonne et des quantités, associées aux dates dans une autre.
Je souhaiterai pouvoir grouper les quantités par date et les additionner. C'est a dire pour un jour donné ne plus avoir plusieurs quantité mais une seule.
J'avais deja pensé à ca mais cela parait trop lourd pour mon PC
Sub recap()
Dim i As Integer
Dim j As Integer
For i = 3 To 11000
For j = 1 To 11000
If Worksheets("ARCHIVE 06").Cells(i, 2) = Worksheets("Feuil2").Cells(j, 1) Then
Worksheets("Feuil2").Cells(j, 2) = Worksheets("Feuil2").Cells(j, 2) + Worksheets("ARCHIVE 06").Cells(i, 9) + Worksheets("ARCHIVE 06").Cells(i, 10)
End If
Next
Next
End Sub
Merci par avance de votre aide:
Voici le problème:
Sous VBA avec Excels; j'ai un tableau avec des dates dans une colonne et des quantités, associées aux dates dans une autre.
Je souhaiterai pouvoir grouper les quantités par date et les additionner. C'est a dire pour un jour donné ne plus avoir plusieurs quantité mais une seule.
J'avais deja pensé à ca mais cela parait trop lourd pour mon PC
Sub recap()
Dim i As Integer
Dim j As Integer
For i = 3 To 11000
For j = 1 To 11000
If Worksheets("ARCHIVE 06").Cells(i, 2) = Worksheets("Feuil2").Cells(j, 1) Then
Worksheets("Feuil2").Cells(j, 2) = Worksheets("Feuil2").Cells(j, 2) + Worksheets("ARCHIVE 06").Cells(i, 9) + Worksheets("ARCHIVE 06").Cells(i, 10)
End If
Next
Next
End Sub
Merci par avance de votre aide:
1 réponse
-
Bonjour,
Pour faciliter le travail, met en pièce jointe un extrait (environ 100lignes) de ton classeur sans données confidentielles au format 97-2003 sur:
https://www.cjoint.com/
j'ai une proposition en t^te mais je préfère bosser sur du concret...
