Somme - condition

Signaler
-
via55
Messages postés
11810
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 février 2020
-
Bonjour,

dans une colonne nous avons des noms, puis dans l'autre des chiffres,
nous avons plusieurs fois dans la même colonne les mêmes noms, par contre, lorsque le nom se répète deux fois COLLÉ nous aurions aimé avoir la somme de ces chiffes qui y correspondent et avoir seulement un seul chiffre si c'est possible, donc supprimer le doublons collé et avoir la somme de ces chiffres, mais seulement quand ils sont COLLÉ

Par exemple :
Colonne 1 : Colonne 2
Maude 1
Francois 2
Genevieve 2
Maude 3
Maude 3
Francois 2
Francois 2

Donc :
4 pour Francois et
6 pour Maude


Configuration: Windows / Chrome 79.0.3945.130

1 réponse

Messages postés
11810
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
28 février 2020
1 682
Bonjour Maude

Avec une macro:
Sub supp_doublons()
ligne = Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row ' dernière ligne remplie en colonne A
For n = ligne To 2 Step -1 ' boucle sur les lignes de puis la dernière jusqu'à ligne 2
If Range("A" & n) = Range("A" & n - 1) Then 'si doublons en col A avec ligne au dessus
Range("B" & n - 1) = Range("B" & n - 1) + Range("B" & n) ' addition des 2 valeurs de B - résultat en ligne du dessus
Rows(n).EntireRow.Delete ' efface la ligne
End If
Next
End Sub

La macro est faite pour des données en colonnes A et B commençant en ligne 2, à adapter à ton fichier

ALT+F11 pour ouvrir l'éditeur VBA
puis Insertion - Module
Copier et coller la macro dans la page et fermer l'éditeur

pour lancer la macro depuis la page à traiter : Développeur dan le Ruban - Macro - Sélectionner la macro et Exécuter

Cdlmnt
Via