Bonjour,
J'ai un code qui marchait très bien sur un tableau et là quand je veux l'appliquer sur un autre tableau à 2 colonnes pour faire la somme des doublons, il ne donne aucun résultat et ne renvoie pas par ailleurs d'erreur:Pouvez-vous me renseigner sur le truc qui cloche en sachant que je veux que mon cde fasse la somme de tous les doublons et non uniquement ceux qui se suivent.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Sub SommeDoublonsSGP() For n = range("A65536").End(xlUp).Row To 2 Step -1 For m = n - 1 To 1 Step -1 If range("A" & m) = range("A" & n) Then range("B" & m) = range("B" & m) + range("B" & n) Rows(n).Delete End If Next m Next n End Sub
En vous remerciant d'avance
Cordialement
Partager