recherche par rapport à 2 données

  • Initiateur de la discussion Initiateur de la discussion mary1
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

mary1

Guest
je souhaiterai obtenir dans le tableau de regroupement de données une formule qui me permettrait de compter le nombre de pers dans une tranche d'âge choisie par rapport à une deuxième donnée (l'ordre).
ci joint un exemple
merci d'avance
mary1
 

Pièces jointes

Re : recherche par rapport à 2 données

Bonjour,

Voici une solution par macro

Sub essai_01()
Dim tab1 'Crée une variable
Set tab1 = CreateObject("Scripting.Dictionary")
ligne = 2
While Cells(ligne, 4) <> ""
code_age = Int(Cells(ligne, 3) / 10)
If code_age > 6 Then code_age = 6
If code_age < 3 Then code_age = 2
ordre = Cells(ligne, 4)
cle = ordre & "_" & code_age
If tab1.exists(cle) Then
tab1(cle) = tab1(cle) + 1
Else
tab1(cle) = 1
End If
cle = xx
ligne = ligne + 1
Wend

Range(Cells(6, 7), Cells(10, 11)).ClearContents
For Each tmp In tab1
cle = tmp
ligne = Left(cle, 1) + 5
col = Right(cle, 1) + 5
Cells(ligne, col) = tab1(cle)
Next
End Sub


Avec les fonctions, si tu ajoutes des noms, il faudra que tu les mettes à jour
 
Re : recherche par rapport à 2 données

bonjour Pyrof,
merci pour ta macro.
cependant, que dois-je remplacer dans la macro donnée pour que ça passe avec ce tableau ci joint?!
merci par avance mary1😱
(inversement de colonnes et tableau avec plus de données)
 

Pièces jointes

Dernière modification par un modérateur:
Re : recherche par rapport à 2 données

C'est tout à fais normal

Les macro font références à des numéros de colonne (colonne ages et ordre)

Or tu ajoutes à chaque fois des colonnes, il faut dans ce remettre à jour la macro.

Je pense qu'avec cette version tu n'aies plus de problème.
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
6
Affichages
333
Réponses
23
Affichages
680
Retour