Nbre de répétitions

[Landsat1]

Bonjour,

J'ai beaucoup de données dans une fichier Excel (Presque 450 000 valeurs) [Voir colonne A] dans lesquelles plusieurs valeurs se répètent. Je veux que les nombres se répètent dans une autre colonne une seule fois [Voir colonne B] et dans une autre colonne le nombre de répétitions de chaque valeur [Voir colonne C].

Attaché un exemple

Merci

 

[mutzik]

Re : Nbre de répétitions

bonjour,

une solution parmi d'autres

 

[R@chid]

Re : Nbre de répétitions

Bonjour et Bienvenu sur XLD,
salut Mutzik,
avec un TCD c'est plus rapide.
@ +

 

[DoubleZero]

Re : Nbre de répétitions

Bonjour, Landsat1, mutzik , R@chid , le Forum,

La même suggestion que mutzik mais codée :

Sub Combien()
Columns("b:c").ClearContents
Columns("a:a").AdvancedFilter Action:=xlFilterCopy, _
        CopyToRange:=Range("b1"), Unique:=True
Range("b1") = "valeur"
Range("c1") = "nbre de répétition"
Range("c2:c" & Range("b65536").End(xlUp).Row).FormulaR1C1 = "=COUNTIF(C[-2],RC[-1])"
End Sub

A bientôt

 

[Landsat1]

Re : Nbre de répétitions

Merciiiiii les gars, Des réponses rapides et efficaces, je les essaierais tous,

@ DoubleZero : je me demande comment entrer ce code?

 

[DoubleZero]

Re : Nbre de répétitions

Re-bonjour,

je me demande comment entrer ce code?

Voir le fichier joint en activant les macros.

A bientôt

 

[Landsat1]

Re : Nbre de répétitions

Re salutations

Merci bien DoubleZero, bien reçu

A bientôt