XL 2016 Compter les doublons

R

Rabeto

XLDnaute Occasionnel
Bonjour,

Je souhaite compter les doublons sans compter le premier doublon qui apparaît de la liste de chaque critère, càd, si il y a 3 valeurs en double pour X personnes, mettre 1 sur les 2 autres valeur et rien sur le premier valeur en double et pour la 2eme colonne, mettre 1 sur les valeurs en double, et rien sur le premier valeur.

Merci,
 

Pièces jointes

  • Doublon.xlsx
    9.7 KB · Affichages: 9
Solution
job75
Bonjour Rabeto, JHA,
Rabeto à dit:
@job75, est il possible de mettre ce genre de formule en macro VBA
Cliquez pour agrandir...
Bien sûr, c'est très classique, voyez le fichier joint et la macro dans le code de la feuille :
VB: 
Private Sub Worksheet_change(ByVal target As Range)
Dim d As Object, tablo, i&, x$, y$
Set d = CreateObject("Scripting.Dictionary")
d.CompareMode = vbTextCompare 'la casse est ignorée
With [A1].CurrentRegion.Resize(, 4)
    tablo = .Value 'matrice, plus rapide
    For i = 2 To UBound(tablo)
        tablo(i, 3) = "": tablo(i, 4) = "" 'RAZ
        x = tablo(i, 2)
        y = x & tablo(i, 1)
        If d.exists(x) Then tablo(i, 4) = 1 Else d(x) = ""
        If d.exists(y) Then tablo(i, 3) = 1 Else d(y) = ""
    Next
    '---restitution---...
Trier par date Trier par votes
R

Rabeto

XLDnaute Occasionnel
Bonjour job75,

je vais m'en sortir pour adapter le code avec mes prochains besoins, :)
En appliquant le code dans le fichier, je pensais que c'était facile de changer juste les codes en fonction de mes besoins mais c'était pas le cas.
Je vais comparer le 1er fichier avec celui que vous avez changer en dernier pour voir ce qui a changé

en tout cas merci beaucoup.
 
Vote positif 0 Vote négatif

Discussions similaires

cp4
  • Résolu(e)
XL 2010 Compter Avec NB.SI.ENS Listobject
2
Réponses
23
Affichages
717
cp4
cp4
F
  • Résolu(e)
XL 2021 recherche doublons dans colonne puis suppression des lignes
Réponses
5
Affichages
461
ftpo69
F
D
  • Résolu(e)
Microsoft 365 Recherche valeurs sur une même ligne & doublons
Réponses
4
Affichages
260
danielco
D
F
  • Question
XL 2016 Compter les valeurs uniques dans une liste
Réponses
3
Affichages
380
F22Raptor
F
R
  • Résolu(e)
XL 2019 Compter avec Sommeprod
Réponses
3
Affichages
485
Rabeto
R
C
  • Résolu(e)
XL 2019 Dico qui garde les doublons
Réponses
3
Affichages
270
carlos
C
T
  • Question
Microsoft 365 Garder les doublons dans une liste déroulante
Réponses
3
Affichages
291
djidji59430
djidji59430
R
  • Résolu(e)
XL 2021 Isoler les doublons
Réponses
10
Affichages
568
djidji59430
djidji59430
A
  • Question
Microsoft 365 NB.SI selon plusieurs critères
Réponses
3
Affichages
285
al.db
A
G
  • Question
XL 2016 recherche formule adaptée
Réponses
6
Affichages
257
Geyka
G

Membres actuellement en ligne

21 membres et 182 invités.

Partager cette page

Tutos vidéos

Power Query : Ajouter des requêtes (Excel et Power BI)
Créez votre première fonction LAMBDA dans Excel en 3 étapes!
LAMBDA, l’arme secrète de Microsoft pour Excel !
Office Insider - Découvrez les nouveautés Excel avant tout le monde

Statistiques des forums

Discussions
314 626
Messages
2 111 297
Membres
111 093
dernier inscrit
Yvounet