Trie données via critères

Bonjour nonesofar13,

Le test se fait ici :

            For i = 5 To n
                For m = 1 To UBound(Man)
                    If Man(m, 1) = .Cells(i, 10) Then
                        Ts(m, 0) = Ts(m, 0) + .Cells(i, 6)

On parcours le tableau Man, quand on trouve la correspondance en J, on ajoute à l'élément tableau Ts de même indice...

L'écart sur B-man provient du fait que sur Feuil3 il y a une valeur 16 pour B-man en ligne 4, ce qui n'est pas conforme à la structure des autres tableaux qui débutent ligne 5. Ma boucle part de 5 (voir ci-dessus), elle omet donc cette valeur...

C'est la feuille qui est à rectifier pour que toutes les feuilles aient même structure : il est logique, établissant des tableaux semblables qui peuvent varier de ne pas forcément avoir le même nombre de lignes (et je teste la dernière ligne pour chaque feuille), mais pas que la ligne de départ soit différente...

Cordialement.

Excellent, merci pour la précision.

Un bon exercice au final .

@ bientôt.

Salut MFerrand et Nonesofar13,

Bon au final mon tuteur préfère que je n'utilise pas de macro car si un jour quelqu'un modifie un tableau pour un besoin les macros ne seront plus adaptées, ce qui en soit en justifiable.

Je vais donc me débrouiller avec les formules qui sont plutôt efficaces.

Merci quand même du temps que vous avez passé pour créer ces macros et m'aider.

A une prochaine peut-être, et encore une fois merci

Cordialement,

Zixx