bonjour a tous,

voici mon problème :

- j'ai + de 100 000 lignes a traiter
- chaque ligne dispose d'un code
- au total j'ai 236 codes différents

mon but est d'additionner chaque temps de chaque ligne en fonction de chaque code

Je connais le code vba suivant qui permet de réaliser l'addition de chaque ligne comportant un code précis (dans mon cas le "1") :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim cellule As Range
 
Range("a1", Range("a300000").End(xlUp)).Select
 
For Each cellule In Selection.Cells
 
If cellule.Value = "1" Then
cellule.Offset(0, 2).Copy
Range("g2").Activate
ActiveCell.PasteSpecial xlPasteValues, xlPasteSpecialOperationAdd
End If
 
Next cellule
comment répéter ce code autant de fois que necessaire sans avoir a me farcir le même bout de code pour les 236 codes différents?

j'ai pensé a du "NEXT ___FOR" imriqué mais la je sèche.

Au secours SVP

NB : je voulais dire du "FOR EACH -_-_-NEXT"