Additionner les chiffres de la colonne B face aux mêmes noms

[Boby71C]

Bonsoir à tous

J'ai déjà vu la réponse quelque part, mais ma mémoire me fait défaut 😱
J'ai un tableau avec des noms en colonne A et un chiffre 1 en face de chaque nom en colonne B.
Je désir que mon tableau se réduise à 1 seule foi chaque nom en colonne A avec en face le cumul selon le nombre de fois ou il apparaissait avant en colonne B.
ex:
Pierre 1
Alain 1
Pierre 1
Pierre 1
Paul 1
Alain 1
Pierre 1

Je désir:
Pierre 4
Alain 2
Paul 1

Merci pour votre précieuse aide

@+
Robert

 

[jp14]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonsoir

Une solution par macro.

A tester

JP

 

[abcd]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonjour,

Il y a moyen de le faire par formule matricielle, donc sans colonne supplémentaire.

Je préfère une méthode douce (c'est à dire une colonne supplémentaire plutôt qu'une formule difficile à manipuler lorsqu'on y est pas habitué).

Vois si la proposition en pièce jointe te convient.

abcd

 

[capricorne68]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

salut

regarde si cela te convient

a+

 

[Boby71C]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonsoir JP14 et le forum

Excellent, c'est exactement ce que je désirais. Je vais analyser le code pas à pas car je ne comprends pas tout.

Merci beaucoup

Bonne soirée

 

[bcharef]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonsoir Robert ,
Bonsoir à toutes et à tous.

Voilà, je vous prose une solution avec un TCD;

A vous lire et bon courage.

Cordialeement.

Bcharef.

 

[Boby71C]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonsoir à tous

Ouf, que de réponses.
bcharef:
Je ne puis utiliser votre méthode car je ne suis pas trés bon en TCD et mon fichier au fil des mois sera trés évolutif, beaucoup de données différentes, aujourd'hui, 180 environ, dans 3 mois peut être 300 et dans 6 mois, ??? donc difficile à gérer avec un TCD.
Capricorne 68:
Je voudrais éviter les formules car à chaque génération du fichier, j'éfface ma feuille.
abcd:
Même raison

Pour l'instant, je reste sur la méthode de jP14 qui est parfaite selon mon besoin, mais que j'ai du mal à comprendre. Je continue le pas à pas.

Pardonnez moi , mais je dois faire un choix. Malgré celà, je conserve vos exemples qui sont trés interréssants. Je suis sûr que j'en aurais besoin à un moment donné.

Un grand merci à tous

 

[Boby71C]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

J'ai été très modeste, mon fichier fait 982 lignes et le code de JP14 est très long à s'exécuter.
Espérons qu'un code moins gourmand viendra s'ajouter aux vôtres.

@+

+ d'une demi heure de traitement. Il est urgent que je trouve une solution bien plus rapide.

 

[bcharef]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Rebonsoir Robert,
Rebonsoir à toutes et à tous.

Voilà toujours le TCD, essaye d'inserer vos données et consulter le TCD.

Je pense bel et bien qu'il conviendra à votre problème.

A vous lire et bon courage.

Cordialement.

Bcharef.

 

[Boby71C]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Re bonsoir
Le problème est que je ne sais pas faire un TCD😱

Je regarderais demain

Bonne soirée et merci

 

[bcharef]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Rebonsoir Robert,
Rebonsoir à toutes et à tous.

Il est utile de vous tenir à vous informer que le TCD est porté sur le feuille "TCD" et qui s'actualise automatiquement.

Et, si ne vous voyez aucun empechemnt, il est temps de percer dans les TCD, que vous pourriez les maitriser le plus normal du monde.

Et, j'ai le grand plaisir de vous communiquer un lien dont j'ai débuter.

Excel - Tableau croisé dynamique

A vous lire et bonne lecture.

Cordialement.

Bcharef.

 

[BOISGONTIER]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonjour,

Sub Essai()
  Set mondico = CreateObject("Scripting.Dictionary")
  For Each c In Range("A1", [A65000].End(xlUp))
     mondico(c.Value) = IIf(mondico.exists(c.Value), mondico(c.Value) + 1, 1)
  Next c
  [d2].Resize(mondico.Count, 1) = Application.Transpose(mondico.keys)
  [e2].Resize(mondico.Count, 1) = Application.Transpose(mondico.items)
  [D2:E100].Sort Key1:=Range("D2"), Order1:=xlAscending, Header:=xlGuess
End Sub

JB
Formation Excel VBA JB

 

[jp14]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonjour à tous

Ci dessous la macro avec un algorithme plus rapide.
Tri des données.

Début de boucle DO
Lecture du premier nom
Incrémentation tant que le nom ne change pas.
Si le nom change redéfinition de la plage de recherche.
Si on est en fin de tableau on quitte la boucle DO
On recommence la boucle.

La macro passe une fois par cellule.

A tester

JP

 

[ChTi160]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Salut Boby71C

Bonjour le fil (un Bonjour particulier à JB)
Bonjour le Forum

Une version avec Collection (je ne maitrise pas encore bien les Dicos mais avec l'aide de JB cela ne saurait tarder Lol)
dans cette version , on fait la somme des valeurs de la colonne B

Le Fichier : Regarde la pièce jointe Conso_Noms(2).zip
Ps : j'ai conservé le Fichier de JB arffff Merci
Arff pas vu Salut JP
Bonne Journée

 

[Boby71C]

Re : Additionner les chiffres de la colonne B face aux mêmes noms

Bonsoir les amis
Merci beaucoup pour toutes vos réponses.
Que dire, à part MERCI et encore MERCI.

Je vais bien garder toutes vos solutions dans un petit coin, car elles ont toutes un grand intérêt.

Je ne pensai pas avoir un si grand nombre de solutions diverses.

Bonne soirée à tous