Supprimer Doublon

matt64000 -  
 matt64000 -
Bonjour,

Bonjour je réalise une macro et je souhaite après avoir identifier les doublons puis d'avoir additionner les valeurs d'une de leurs colonnes, supprimer les valeurs identifier comme doublon et ne garder qu'une valeur avec la valeur additionnée.

Ex:

Reférence Doublon Ref Tps Tps Total

7647 6 6
8320 49 49
8522 Doubon 1 1
8522 Doublon 0.5 1.50
8522 Doublon 28.5 30.00
8522 Doublon 31.5 61.50
8522 5 66.50

Voila don je souhaiterai au final n'avoir que:

Reférence Doublon Ref Tps Tps Total

7647 6 6
8320 49 49
8522 5 66.50

Voilà Merci beaucoup de votre aide.
A voir également:

5 réponses

gbinforme Messages postés 15481 Date d'inscription   Statut Contributeur Dernière intervention   4 730
 
bonjour

Avec le code suivant tu devrais obtenir ce que tu veux :

Public Sub sup_doubles()
Dim lig As Long
lig = 1
While Cells(lig, 1).Value <> ""
    If Cells(lig, 1).Value = Cells(lig + 1, 1).Value Then
        Rows(lig).Delete
    Else
        lig = lig + 1
    End If
Wend
End Sub
0
matt64000
 
Non cela n'a pas fonctionné...
0
gbinforme Messages postés 15481 Date d'inscription   Statut Contributeur Dernière intervention   4 730
 
bonjour,

Tu penses qu'avec une réponse aussi laconique l'on peut t'aider ?

Sans doute que ton classeur ne correspond pas à ton exemple.
0
matt64000
 
Bonjour,

Pardon, donc en effet mon classeur comporte 16 colonnes. Les chiffres en doublon sont dans la colonne B et dans la colonne C j'ai fait une formule en si pour lorsque j'ai un doublon en B excel écrit "Doublon". les chiffres qui sont associés sont en colonne K et leur cummule si "Doublon" est en collone L.

Je souhaite donc s'il vous plaît avoir des chiffres sans doublon en B avec sa valeur (nombre cumulé si doublons auparavant doublons) en colonne L.

Voilà. Merci pour votre aide.
-1

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
matt64000
 
up !
-1