IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

calcul du nombre d'éléments identiques [XL-2007]


Sujet :

Macros et VBA Excel

  1. #1
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    9
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 9
    Points : 7
    Points
    7
    Par défaut calcul du nombre d'éléments identiques
    Re bonjour!

    Comment peut on faire pour, dans une colonne quelconque, trouver le nombre d'éléments identiques?
    Merci d'avance pour tout éclairement que vous pourrez m'apporter!

  2. #2
    Membre du Club
    Inscrit en
    Février 2009
    Messages
    36
    Détails du profil
    Informations personnelles :
    Âge : 70

    Informations forums :
    Inscription : Février 2009
    Messages : 36
    Points : 40
    Points
    40
    Par défaut
    Bonjour,

    A priori le plus siple semble être la fonction NB.SI

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =NB.SI(A3:A10;"Mon critère")[
    Bien sûr le critère peut être contenu dans une cellule

    Bonne journée

  3. #3
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    9
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 9
    Points : 7
    Points
    7
    Par défaut
    ah oui...j'y avais pas pensé! Ca peut etre une bonne idée!
    Un grand merci!

  4. #4
    Membre expérimenté Avatar de laetitia
    Profil pro
    Inscrit en
    Décembre 2002
    Messages
    1 281
    Détails du profil
    Informations personnelles :
    Âge : 34
    Localisation : France

    Informations forums :
    Inscription : Décembre 2002
    Messages : 1 281
    Points : 1 512
    Points
    1 512
    Par défaut
    bonjour labo33 Gégé29 le forum tu peus faire un truc comme cela aussi
    donnees colonne A résultat sur colonne E & F a adapter

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Option Explicit
    Sub test()
     Dim c As Variant, M As Object
    Application.ScreenUpdating = False
    Set M = CreateObject("Scripting.Dictionary")
    For Each c In Range("A2", [a65000].End(xlUp))
    M(c.Value) = IIf(M.exists(c.Value), M(c.Value) + 1, 1)
    Next c
    [e2].Resize(M.Count, 1) = Application.Transpose(M.keys)
    [f2].Resize(M.Count, 1) = Application.Transpose(M.items)
    End Sub

  5. #5
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    9
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 9
    Points : 7
    Points
    7
    Par défaut
    Un grand merci...je crois que je vais pouvoir me débrouiller avec ces deux possibilités...j'essaie la première que je comprends et si ca ne marche pas comme je veux, j'opterai pour la deuxième solution...
    Un grand merci!

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. calculer le nombre de mots identiques
    Par narjes81 dans le forum Débuter
    Réponses: 3
    Dernier message: 03/01/2011, 00h33
  2. calculer le nombre d'éléments d'un tableau
    Par sanaefg dans le forum C
    Réponses: 2
    Dernier message: 29/01/2010, 22h24
  3. calculer le nombre d'éléments de chaque groupe
    Par amine003 dans le forum Langage SQL
    Réponses: 1
    Dernier message: 02/12/2008, 11h04
  4. Réponses: 15
    Dernier message: 17/06/2006, 11h49
  5. Comparaison de base et calculs du nombre d'éléments dans Bas
    Par BXDSPORT dans le forum Bases de données
    Réponses: 3
    Dernier message: 19/07/2004, 08h00

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo