Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro Filtre + Suppression + Sous Total

DaMoon

XLDnaute Nouveau
Bonjour à tous,

J'aimerai faire des modifications sur un fichier excel.

=> Suppression des lignes où la colonne Notes contient "All glued in place"
=> Modifications du fichier :
Pour une description et une couleur donnée :
Il y a plusieurs lignes à cause d'une colonne Notes différentes.
J'aimerai pour chaque description et chaque couleur avoir une seule ligne comportant la somme des pièces.

Schématiquement je vois ça comme celà :
Code:
Select Description
    Select Color
         Somme de la colonne Quantity et transfert dans 1 ere ligne affichée
         Suppression des lignes superflues
    Couleur Suivante
Description Suivante

=> Ajout d'une colonne Total après colonne Quantity
Pour chaque description, une somme de la colonne quantity reportée dans une nouvelle colonne Total

J'espère que vous pourrez m'aider
Merci d'avance.

Je fourni un fichier type en lien. (le fichier d'origine à environ 7000 lignes)
 

Pièces jointes

  • PeeronMyPartsEpuree.zip
    32.7 KB · Affichages: 32
  • PeeronMyPartsEpuree.zip
    32.7 KB · Affichages: 32
  • PeeronMyPartsEpuree.zip
    32.7 KB · Affichages: 31

pierrejean

XLDnaute Barbatruc
Re : Macro Filtre + Suppression + Sous Total

bonjour DaMoon

Vois si cela te convient
 

Pièces jointes

  • PeeronMyPartsEpuree.zip
    40.5 KB · Affichages: 42
  • PeeronMyPartsEpuree.zip
    40.5 KB · Affichages: 42
  • PeeronMyPartsEpuree.zip
    40.5 KB · Affichages: 43

DaMoon

XLDnaute Nouveau
Re : Macro Filtre + Suppression + Sous Total

Bonjour PierreJean,

Tout d'abord merci de t'interesser à mon cas
Je ne comprend pas très bien le résultat de ta macro

Mais ça vient de mon explication je pense
Je vais tenter d'expliquer un peu mieux.

Dans le fichier, chaque élément est défini, par ordre d'importance selon moi, par une description, une couleur et une quantité. (les colonnes Part Number et Type ont peu d'importance)

Je voudrais qu'après traitement chaque couple description + couleur soit unique.
Pour l'instant ce n'est pas le cas, par exemple pour la description "Plate 1 x 1 Round", il y a 7 lignes pour la couleur Black, 5 pour Blue, etc...
Je voudrais avoir la somme de la colonne Quantity de ces 7 lignes dans une seule et que les autres soit supprimées.
Certains couples description/couleur n'ont pas besoin de traitement (la majorité d'ailleur).

Ensuite pour chaque description (toutes couleurs confondues) le total de pièces.
Si je reprend mon exemple "Plate 1 x 1 Round" il ya 2887 pièces en tout.
 

pierrejean

XLDnaute Barbatruc
Re : Macro Filtre + Suppression + Sous Total

Re

Je comprend assez vite si on m'explique longuement

Vois si cela te convient
Note: Macro assez longue a l'execution (33 secondes chez moi)
Si besoin d'accelerer on peut essayer !!
 

Pièces jointes

  • PeeronMyPartsEpureeb.zip
    44.3 KB · Affichages: 36
  • PeeronMyPartsEpureeb.zip
    44.3 KB · Affichages: 40
  • PeeronMyPartsEpureeb.zip
    44.3 KB · Affichages: 37

pierrejean

XLDnaute Barbatruc
Re : Macro Filtre + Suppression + Sous Total

Re

Version environ 3 fois plus rapide
 

Pièces jointes

  • PeeronMyPartsEpureeb.zip
    42.8 KB · Affichages: 31
  • PeeronMyPartsEpureeb.zip
    42.8 KB · Affichages: 30
  • PeeronMyPartsEpureeb.zip
    42.8 KB · Affichages: 47

DaMoon

XLDnaute Nouveau
Re : Macro Filtre + Suppression + Sous Total

En fait, en testant sur mon fichier complet, ça bloque excel

EDIT : Ca prend bien 10-15minutes sur le fichier complet ^^
 
Dernière édition:

pierrejean

XLDnaute Barbatruc
Re : Macro Filtre + Suppression + Sous Total

Re

Voila un peu plus rapide !!
 

Pièces jointes

  • PeeronMyPartsEpureeb.zip
    42.9 KB · Affichages: 68
  • PeeronMyPartsEpureeb.zip
    42.9 KB · Affichages: 69
  • PeeronMyPartsEpureeb.zip
    42.9 KB · Affichages: 71

Discussions similaires

Réponses
6
Affichages
345
Réponses
18
Affichages
794
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…