Occurence sur deux colonnes en fonction de doublons

moussoni · 29 Janvier 2019

Bonjour à tous,

Je souhaiterai compter le nombre d'occurrence sur une colonne en fonction d'un critère sur une deuxième colonne.

Col A Col B
Mr AAA
Mlle BBB
Mme CCC
Enfant DDD
Bébé EEE
Mr AAA
Mme HHH
Bébé EEE

Par exemple si je fais NB.SI(A:A;A2) = 2 car le nom Mr apparaît deux fois sauf qu'étant donné que le type Mr en col A est associé au même code AAA en col B je souhaiterai que le résultat soit de 1 uniquement car j'ai un doublon dans la col B. Sachant que j'ai plusieurs éléments en colonne A à Compter

Ce lien n'existe plus

Merci beaucoup de votre aide !

youky(BJ) · 29 Janvier 2019

Bonjour,
Je n'ai pas chargé le fichier, il y a tout ce qu'il faut ici…
Je sais faire seulement en macro que l'on peut transformer en function donc voici une macro
avec dico.
Bruno

VB:

Sub compter()
Dim ab As String
With Sheets("Feuil1") 'a adapter
Set dico = CreateObject("Scripting.Dictionary")
For Each c In .Range([a2], .[a65000].End(xlUp))
ab = c.Value & c.Offset(, 1)
dico.Item(ab) = dico.Item(ab)
Next c
MsgBox dico.Count
End With
End Sub

mapomme · 29 Janvier 2019

Bonjour @moussoni,

Pas bien compris la demande , voir les formules dans le fichier joint (deux interprétations de la demande donc deux formules).

edit : bonjour @youky(BJ)

moussoni · 29 Janvier 2019

youky(BJ) à dit:
Bonjour,
Je n'ai pas chargé le fichier, il y a tout ce qu'il faut ici…
Je sais faire seulement en macro que l'on peut transformer en function donc voici une macro
avec dico.
Bruno

VB:

Sub compter() Dim ab As String With Sheets("Feuil1") 'a adapter Set dico = CreateObject("Scripting.Dictionary") For Each c In .Range([a2], .[a65000].End(xlUp)) ab = c.Value & c.Offset(, 1) dico.Item(ab) = dico.Item(ab) Next c MsgBox dico.Count End With End Sub

Merci Youky(Bj), une fois de plus tu me sauves Je vais de ce pas tester tout cela

moussoni · 29 Janvier 2019

mapomme à dit:
Bonjour @moussoni,

Pas bien compris la demande , voir les formules dans le fichier joint (deux interprétations de la demande donc deux formules).

edit : bonjour @youky(BJ)

Merci beaucoup mapomme Je vais tester tout ça !!!

Occurence sur deux colonnes en fonction de doublons

moussoni

XLDnaute Nouveau

youky(BJ)

XLDnaute Barbatruc

mapomme

XLDnaute Barbatruc

Pièces jointes

moussoni

XLDnaute Nouveau

moussoni

XLDnaute Nouveau

Discussions similaires