VBA - Compter

Bonjour tout le monde,

Je voulais savoir comment utiliser le countif ou sumif en VBA pour arriver à additionner le nombre de valeur suivant la même référence d'une cellule.

Donc, en état 1 j'ai un tableau avec dans une colonne les chiffres et l'autre à quel team c'est associé.

Dans la table 2, soit le résultat j'ai un tableau qui regroupe sans doublon toutes les teams possible et dans la colonne à côté le résultat de tous les chiffres qui leur sont associé en table 1

Je pense que le fichier sera plus explicite...

Encore merci pour votre aide !!

Bruno

Tant que t'y es t'aurais dû poser ta question en anglais...

Allez, je me lance mais en TCD et en français

ou encore:

Sub Totaliser()
  Set mondico = CreateObject("Scripting.Dictionary")
  For Each c In Range("b2", [b65000].End(xlUp))
    mondico(c.Value) = mondico(c.Value) + c.Offset(, -1).Value
  Next c
  [E2].Resize(mondico.Count, 1) = Application.Transpose(mondico.keys)
  [f2].Resize(mondico.Count, 1) = Application.Transpose(mondico.items)
  [E1].Sort Key1:=[E2], Order1:=xlAscending, Header:=xlYes
End Sub

P.

...pour faciliter les délocalisations...

Bonsoir MFerrand & patrick ^^

Désolé, mais je voulais poser la question sur un forum anglais à la base, mais au final les Français sont plus réactif, du coup je la pose ici mais j'ai pas pensé à modifier le fichier. Mais qui si on regarde le script y a plus de Français qu'autre chose ^^

MErci pour votre aide