Synthèse de données avec calcul

[chrisw]

Bonjour,

je débute sous excel en programmation mais souhaite en apprendre d'avantage.
Je voudrais obtenir une synthèse des données par identifiant avec une somme des montants en utilisant une macro.
La feuille de données comporte plusieurs informations liés à l'identifiant.

Un exemple avec la synthèse souhaitée.

Merci d'avance

 

[chrisw]

Re : Synthèse de données avec calcul

Je me lance :

NbL = Worksheets("Données").Cells(Rows.Count, "A").End(xlUp).Row - 1
For Each Ident In GroupOrg(Worksheets("Données").Range("A2:F2").Resize(NbL), 1)
Après cette étape on remets les valeurs à 0
For Each Détail In Ident.Contenu
Valeur = Valeur+Détail(6)
Report de tous le contenu du SSGroup
Fin
Sous Groupe suivant

 

[Dranreb]

Re : Synthèse de données avec calcul

C'est pas mal du tout.
Mais il manque toujours le report en question vers des éléments d'une nouvelle ligne L d'un tableau de sortie.

Allez, je vous le donne.

 

[chrisw]

Re : Synthèse de données avec calcul

Merci beaucoup pour votre patiente et vos explications 🙂
J'adapte la fonction à mes données réelles, je devrais y arriver.

 

[chrisw]

Re : Synthèse de données avec calcul

J'ai adapté la fonction à une tableau réel, l'affichage est bon mais j'ai un problème sur mon Id
La valeur de l'Id dans le tableau final est bien affichée mais si je fais une copie il affiche toujours la même valeur. Mon Id se compose de 18 caractères, es-ce pris en charge ?

 

[chrisw]

Re : Synthèse de données avec calcul

Tout est rentré dans l'ordre, j'ai ré-enregistré le fichier, les données sont à présent valide.