Dénombrer le nombre de références (fréquences)
Résolu/Fermé
Rachellaaa
Messages postés
24
Date d'inscription
vendredi 17 août 2018
Statut
Membre
Dernière intervention
31 août 2018
-
17 août 2018 à 17:59
Rachellaaa Messages postés 24 Date d'inscription vendredi 17 août 2018 Statut Membre Dernière intervention 31 août 2018 - 18 août 2018 à 08:20
Rachellaaa Messages postés 24 Date d'inscription vendredi 17 août 2018 Statut Membre Dernière intervention 31 août 2018 - 18 août 2018 à 08:20
A voir également:
- Dénombrer le nombre de références (fréquences)
- Nombre facile - Télécharger - Outils professionnels
- Le nombre de tentatives de déverrouillage incorrectes est trop élevé samsung - Forum LG
- Nombre de combinaison possible avec 4 chiffres - Forum Programmation
- Il existe une ou plusieurs références circulaires ✓ - Forum Excel
- Gto nombre episode ✓ - Forum Jeux vidéo
2 réponses
via55
Messages postés
14502
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
9 décembre 2024
2 736
Modifié le 17 août 2018 à 19:17
Modifié le 17 août 2018 à 19:17
Bonjour
Voir avec une fonction personnalisée en VBA
ALT+F11 pour ouvrir l'éditeurVBA puis Insertion et Module - Copier coller la macro suivante dans la page et fermer l'éditeur
S'utilise comme n'importe qu'elle fonction avec la syntaxe
=(plage; nombre de fois)
exemple =(A1:A100;2) pour avoir le nombre de références revenant 2 fois dans la plage A1:A100
Cdlmnt
Via
Voir avec une fonction personnalisée en VBA
ALT+F11 pour ouvrir l'éditeurVBA puis Insertion et Module - Copier coller la macro suivante dans la page et fermer l'éditeur
Function denomref(plage As Range, nb As Integer) For Each cell In plage ref = cell.Value n = Application.WorksheetFunction.CountIf(plage, ref) If n = nb Then Total = Total + 1 / nb Next denomref = Total End Function
S'utilise comme n'importe qu'elle fonction avec la syntaxe
=(plage; nombre de fois)
exemple =(A1:A100;2) pour avoir le nombre de références revenant 2 fois dans la plage A1:A100
Cdlmnt
Via
via55
Messages postés
14502
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
9 décembre 2024
2 736
Modifié le 18 août 2018 à 00:03
Modifié le 18 août 2018 à 00:03
Re
Dans ce cas il faut compter toutes doublons, triplons etc
Donc avec une autre macro qui prend en compte jusqu'à 100 valeurs identiques
La syntaxe de la fonction ici est plus simple il suffit d'indiquer la plage à traiter , ex : denomrefsup(A1:A:250)
Cdlmnt
Via
Dans ce cas il faut compter toutes doublons, triplons etc
Donc avec une autre macro qui prend en compte jusqu'à 100 valeurs identiques
Function denomrefsup(plage As Range) For Each cell In plage ref = cell.Value n = Application.WorksheetFunction.CountIf(plage, ref) For t = 2 To 100 'pour les occurrences se retrouvant 2 fois, 3 fois ....100 fois, augmenter le max de 100 si nécessaire If n = t Then Total = Total + 1 / t Next Next denomrefsup = Total End Function
La syntaxe de la fonction ici est plus simple il suffit d'indiquer la plage à traiter , ex : denomrefsup(A1:A:250)
Cdlmnt
Via
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 247
18 août 2018 à 00:54
18 août 2018 à 00:54
Salut via,
Je crains de dire une bêtise car il est tard, mais que penses-tu de compter ceux listé 1 fois et les déduire du total ? :-)
eric
Je crains de dire une bêtise car il est tard, mais que penses-tu de compter ceux listé 1 fois et les déduire du total ? :-)
eric
Rachellaaa
Messages postés
24
Date d'inscription
vendredi 17 août 2018
Statut
Membre
Dernière intervention
31 août 2018
18 août 2018 à 08:20
18 août 2018 à 08:20
Bonjour Via et Eriiic,
Merci beaucoup pour votre aide le deuxième codage fonctionne également!!! Et oui malgré l’heure Eriiic vous avez raison ça fonctionne aussi!
Encore une fois je vous remercie sincèrement du temps que vous m’avez consacré!
Bonne journée à vous!
Merci beaucoup pour votre aide le deuxième codage fonctionne également!!! Et oui malgré l’heure Eriiic vous avez raison ça fonctionne aussi!
Encore une fois je vous remercie sincèrement du temps que vous m’avez consacré!
Bonne journée à vous!
17 août 2018 à 20:44
Ça fonctionne! Merci beaucoup!!! je n’y serai jamais parvenue seule car je ne suis pas à l’aise avec les vba. Mais grâce à votre code et vos explications j’y suis parvenue! Donc vraiment merci!
J’aurais svp une petite précision à vous demander dans le cas où je souhaite calculer le nombre de référence qui reviennent plus d’une seule fois, qu’est ce que je dois ajouter à la formule? J’ai essayé >1 mais ça ne fonctionne pas.
Merci encore pour votre réponse! Bon week-end
B
17 août 2018 à 22:51
c'est le 2ème paramètre qu'il faut faire varier :
exemple =(A1:A100;2) pour avoir le nombre de références revenant 2 fois dans la plage A1:A100
eric
17 août 2018 à 22:58
Oui ça j’avais compris désolé j’ai dû mal m’exprimer. J’ai besoin d’englober le nombre de références de celles qui reviennent plus d’1 fois.
J’espère avoir été plus précise!
Et merci encore pour vos réponses!