Compter sans doublon avec critere specifique

[dams76]

Bonjour à tous,
Mes quelques notions en excels ne permettent pas de venir à bout de mon problème.
Mon but est de compter sans doublon des villes selon un critère qui peut varié. Seul problème ce critère est en dehors de ma plage de donnée.
Ci joint fichier excel pour une meilleure compréhension.
Je cherche a avoir en B2 la somme des villes selon le departement choisi en B1.

J'ai trouvé une solution sur ce forum mais elle m'oblige à créer une colonne supplémentaire, ce qui ne m'arrange pas.

J'espere que mes explications sont claires....., et que vous allez pouvoir m'aider

d'avance merci

 

[pierrejean]

Re : Compter sans doublon avec critere specifique

Bonjour dam76

Et bienvenue sur XLD

A tester ( en B2 ) : =SOMMEPROD((B6:B10<>"")*(A6:A10=B1))

 

[dams76]

Re : Compter sans doublon avec critere specifique

Merci pour votre réponse.
C'est une solution que j'ai essayé, et qui fonctionne lorsqu'on a pas de doublons.
Je viens de voir que je l'ai mis dans le titre mais pas dans le résumé de mon problème dsl.
Pour résumer j'ai besoin de la même formule mais sans qu'elle ne compte les doublons.
Pour le département 02 de mon exemple j'aimerai trouvé 2 carville est en doublon

 

[BOISGONTIER]

Re : Compter sans doublon avec critere specifique

Bonjour,

Occurences diff avec critère

JB

 

[dams76]

Re : Compter sans doublon avec critere specifique

merci pour ce lien très instructif, mais je suis perdu dans la multiplicité des informations
je ne retrouve pas la façon de faire pour compter sans doublon et avec un critère en dehors de la plage de donnée, peut être pouvez vous m'en dire plus?
merci

 

[BOISGONTIER]

Re : Compter sans doublon avec critere specifique

Voir PJ

=NB(1/FREQUENCE(SI(critere=B1;EQUIV(champ;champ;0));LIGNE(INDIRECT("1:"&LIGNES(champ)))))
Valider avec maj+ctrl+entrée

JB

 

[dams76]

Re : Compter sans doublon avec critere specifique

ah d'accord ok, j'étais loin de la solution.
je ne comprends pas toute la formule mais elle fonctionne
merci
j'espere ne jamais avoir de celulle vide dans mes villes , car apparement la formule ne fonctionne pas dans ce cas

 

[dams76]

Re : Compter sans doublon avec critere specifique

J'ai testé la solution sur mon fichier reel, la formule fonctionne mais le temps de reponse est beaucoup trop lent .
Je pense que la solution est de passer par va, mais la je sèche complètement...
Quelqu'un peut il m'aider?

 

[BOISGONTIER]

Re : Compter sans doublon avec critere specifique

Avec fonction perso

Function ItemsDifferentsCritere(champ, champcritere, critere)
  Set MonDico = CreateObject("Scripting.Dictionary")
  a = champ
  b = champcritere
  For i = 1 To champ.Count
    If b(i, 1) = critere And a(i, 1) <> "" Then
       temp = a(i, 1)
       MonDico(temp) = temp
    End If
  Next i
  ItemsDifferentsCritere = MonDico.Count
End Function

JB