VBA Excel occurence de valeurs dans un tableau

[Aimedija]

Bonjour,

Dans le cadre de réparation sur des voitures, j'ai un workbook avec de multiples feuilles et chacune à un tableau qui se présente comme suit mais dont le nombre de lignes peux varier.

Pour l'exemple Feuil1 & Feuil2:

Colonne A : le type de véhicules ( peux être répété plusieurs fois)
Colonne B : le numéro de série ( numéro unique)
De la colonne C à la colonne V : le type de réparations ( de 1 à 20)
(Voir fichier joint)
j'essaye en vain de d'automatiser la question suivante ; par type de véhicules (Colonne A) , quelles sont les réparations les plus fréquentes ( top 5 décroissant) ?

Résultat attendue :
Type de véhicule "A" = Reparations 10 , 18, 12, 8, 14

Ayant déjà consulter les fonctions excel NB.Si & NB.SI.ENS, je ne parviens pas à automatiser (VBA) ses opérations sur plusieurs feuilles avec un nombre élevé de lignes.

Auriez-vous une suggestion? Merci d'avance

 

[chris]

Re

Oui c'est gratuit.

 

[Aimedija]

Re
Donc pas nécessaire d'avoir une Ligne vide en tête de la plage de Données des Feuilles Source.
je pense qu'il serait plus adapté d'avoir des Feuilles Nommées par exemple "M_1_2018" ou "M_1" pour le mois de Janvier ,"M_2_2018" ou "M_2" pour Février etc etc
plus simple pour ci retrouver au Niveau des Macro de récupération .
Tu n'as pas répondu a ma demande d'explication (exemple) Post#12
à toi de voir !
Bonne fin de journée
jean marie

Jean - Marie,
Le forum,

Je suis bien d'accord avec toi , voici un exemple corrigé ci-joint (avec feuille nommé et pas de ligne vide en ligne 3).

Voici ce que je veux dire pour l'exemple de ta question Post #12 ; Si pour le Véhicule 2199 les réparations les plus courantes sont les Réparations 1 / 4 /7/11/12 (en tête de colonnes) avec des coûts respectifs de 38 € / 144€/ 124€/ 60€/ 56€ , il serait bien de savoir quel est le coût total de ses réparations si elles sont effectués plusieurs fois. Ceci est une question subsidiaire étant donner qu'Excel peux très bien le faire.

En espérant que mes explications soit assez claires.

Chris,
Merci

 

[chris]

Re

Coût ajouté au fichier du #16

 

[ChTi160]

Re
Ok merci
Je regarde ton fichier chris!
Jean marie

 

[chris]

Re

une question à toi chris , peux tu faire apparaître dans ces Tableaux par exemple : le nom de la Feuille Source ?

Mes recherches d'automatiser cela ont abouti : grâce à divers liens et recherches j'ai trouvé

• demander à PowerQuery de répertorier tous les tableaux du classeur et donc récupérer leur noms (d'où l'intérêt de nommer ses tableaux et ne pas laisser Tableau1 & cie)
  
• demander à PowerQuery de lister les colonnes des tableaux (qui doivent avoir la même structure)

Cela enchaîne automatiquement la mise bout à bout avec indication de la source (Nom du tableau) dans une colonne

Edit : Exemple joint...

 

[ChTi160]

Bonjour chris
Bonjour le Fil , le Forum
j’espère que tu vas bien?
je pense que cela pourrait intéresser beaucoup de monde .
Merci par avance
jean marie

 

[chris]

Re

Joint à mon post précédent.

 

[ChTi160]

Re
Merci chris!
Bonne fin de journee

 

[Aimedija]

Bonjour tous le monde,

un grand merci pour votre aide , bien que la solution en PowerQuery soit épatante je continue à rechercher cette solution en VBA.

Bien à vous,

 

[ChTi160]

Bonjour Aimedija

Bonjour le Fil ,le Forum

moi j'y travaille(au Vba) Lol ,Mais à mon rythme , c est à dire pas trop vite !lol
j'espère pourvoir fournir une approche Lol.
à suivre .....
Bonne journée
Jean marie

 

[Aimedija]

Bonjour Jean-Marie,
Bonjour le forum,

un grand merci pour ton feedback, prend tout le temps nécessaire.

Bien à toi,

 

[ChTi160]

Bonjour Aimedija
Bonjour le Fil,le Forum
Une Approche Lol(Perfectible)
Edit : j'ai modifie le Fichier (11:30)
Bonne journée
Jean marie

 

[ChTi160]

Re
Une autre Version !
Bonne fin de Soirée
jean marie

 

[Aimedija]

Bonjour le forum,
Bonjour jean-Marie,

Un grand merci pour ton intervention, je fais effectuer certains tests et je reviens vers toi dés que possible.

Merci et bien à toi,

 

[ChTi160]

Bonjour Aimedja
Bonjour le fil , le Forum
j'ai une autre version , j'attends ton retour lol
Bonne fin de journée
Jean marie