Compter le nombre d'occurences associées à un chiffre ou nombre

popey003 Messages postés 5 Date d'inscription   Statut Membre Dernière intervention   -  
popey003 Messages postés 5 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
j'ai un tableau en $AS:$AW avec étiquette ABCDE dans lequel j'aimerais compter pour chaque numéro de 1 à 20 :
le nombre de fois que chaque numéro est associé avec le 1, le 2, le 3, le 4 etc... jusqu'à 20 par ligne/

exemple
A B C D E
18 16 6 13 3
12 9 3 11 15
1 4 3 11 12
1 8 13 2 12
4 1 13 12 7
13 1 4 2 16
12 4 15 10 7
1 8 13 12 10
18 12 10 8 3
10 13 4 3 5
3 1 4 7 6
12 13 16 9 6

pour le numéro 1 :
réponse : 1/0 2/2 3/2 4/4 5/0 etc ...
peut-être exite-t-il simplement une formule mais j'avoue que je coince!
Merci d'avance!



A voir également:

2 réponses

Réponse 1 / 2
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour, je pense que le plus simple est de faire un petit programme VBA qui fait cela.
0
popey003 Messages postés 5 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour yg_be

Je suis amateur de VBA mais je sèche un peu j'avoue car ç'est un peu complexe pour l'exprimer...
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > popey003 Messages postés 5 Date d'inscription   Statut Membre Dernière intervention  
 
je te propose ceci pour commencer: 
Option Explicit

Sub popey()
Dim compte(1 To 20, 1 To 20) As Long
Dim fl As Worksheet
Dim lig As Long
Dim i As Integer, j As Integer

Set fl = ThisWorkbook.Sheets("une")
lig = 2
Do While fl.Cells(lig, 1) <> ""
    For i = 1 To 5
        For j = i + 1 To 5
            compte(fl.Cells(lig, i), Cells(lig, j)) = compte(fl.Cells(lig, i), Cells(lig, j)) + 1
            compte(fl.Cells(lig, j), Cells(lig, i)) = compte(fl.Cells(lig, i), Cells(lig, j))
        Next j
    Next i
    lig = lig + 1
Loop 'Do While fl.Cells(lig, 1) <> ""
End Sub

cela commence en B2, pas en AS2.
il n'y a pas de vérification que les cellules contiennent des nombres entiers entre 1 et 20.
ni de présentation du résultat, il est simplement dans le tableau "compte".
0
Réponse 2 / 2
popey003 Messages postés 5 Date d'inscription   Statut Membre Dernière intervention  
 
Merci pour votre attention, néanmoins, c'est trop compliqué pour moi...
Pour ma part, il me faudrait une présentation d'un résultat correspondant au tableau figurant en AS:AW.
Désolé je suis nul !
0

Discussions similaires

additionner nombres dans cellules avec texte
kawimaki -
kawimaki -

6 réponses
Combinaisons possibles avec 3 séries de 3 nombres
Jao -
acefalo -

1 réponse