Suppression de lignes + addition de valeurs

[julien974]

Bonjour les amis!

J'ai un petit problème avec un fichier.

J'aimerai regrouper le nombre de palettes pour les departements ayant le même CODE POSTAL.

EX : 3 lignes ont pour CP 45 avec respectivement 4, 3 et 1 palette.
Je souhaiterais en avoir plus qu'une avec 8 palette et que les deux autres soient supprimées.

Une boucle While Wend serait pe une solution non?

Ci joint le fichier,

Merci de votre aide,

Julie974

 

[Isa_]

Re : Suppression de lignes + addition de valeurs

Tu veux absolument le résultat sur la même feuille?
- Oui : macro avec un For i=1 to ActiveSheet.UsedRange.Rows.Count (c'est le nombre de ligne remplies dans ton classeur)
- Non : utilise sommeprod dans une nouvelle feuille avec les CP de répertoriés

 

[julien974]

Re : Suppression de lignes + addition de valeurs

Bonjour Isa,

Dans ds la même feuille ce serait parfait.

Mais je ne suis qu'un novice en VBA dc si tu pouvais m'aider en me proposant qq chose... Merci

Les autres experts sont bien entendus invité a participer

A très vite,

Julien974

 

[Isa_]

Re : Suppression de lignes + addition de valeurs

Essaye ça!

Si tu as des question hesite pas!

 

[julien974]

Re : Suppression de lignes + addition de valeurs

Merci,

Juste une petite chose...

Lorsque je met beaucoup plus de lignes ac le CP 45, il en reste 2 apres que ta macro soit passée...

PQ?

Merci,

Julien974

 

[RENAUDER]

Re : Suppression de lignes + addition de valeurs

Bonjour,

Un autre exemple ou je n'ai pas supprimé les lignes car si Pays et Type sont différents que fait-on ?
Les compter à part ?

 

[julien974]

Re : Suppression de lignes + addition de valeurs

En effet, cela a une incidence...

Il faut que le pays soit identique.

Peut tu le refaire en supprimant les lignes?

Muchas gracias amigo,

Julien974

 

[Isa_]

Re : Suppression de lignes + addition de valeurs

C'est la même chose avec des conditon en plus dans le IF

If Cells(i, 1) = Cells(j, 1) And Cells(i, 2) = Cells(j, 2) And Cells(i, 3) = Cells(j, 3) Then

Par contre je trouve pas ton problème! T'aurait pas exemple Stp

 

[RENAUDER]

Re : Suppression de lignes + addition de valeurs

Bonjour Julien,

Redonnes un exemple complet

 

[Isa_]

Re : Suppression de lignes + addition de valeurs

Pardon,
J'ai compris mon erreur, lorsque je supprime la ligne je ne change pas l'indice de i. De ce faite, je passais involontairement une ligne.
Là c'est mieux!

 

[julien974]

Re : Suppression de lignes + addition de valeurs

Merci bcp ISA,

Je pense juste que tu as mis un critère de trop... En effet, le Type n'a pas de repercutions comme peut l'etre le pays...

Dans l'attente de ta réponse,

Bonne apres midi,

Julien974

 

[Isa_]

Re : Suppression de lignes + addition de valeurs

Oui tu as sûrement raison.
As-toi d’améliorer la formule à ton gré.
Bon courage et bonne journée.