Transposer des lignes avec données partiellement identiques

creator3_1969 Messages postés 13 Date d'inscription   Statut Membre Dernière intervention   -  
titeufdu89 Messages postés 387 Statut Membre -
Bonjour,

Je ne suis pas un expert d'excel et afin de pouvoir faire un rapport qui puisse me donner les informations dont j'ai besoin, il faudrait que j'arrive à transposer les lignes dont la référence en colonne C est identique en colonne mais cela doit se reproduire à chaque fois que la référence de la colonne C change.

Ci-dessous mes données



et j'aimerais arriver à ce résultat (que j'ai fait manuellement bien sûr) :



et ainsi de suite pour toutes les autres lignes du fichier.

Pouvez-vous m'aider ?

merci beaucoup

Laurent

1 réponse

  1. titeufdu89 Messages postés 387 Statut Membre 38
     
    Bonjour Laurent,

    Voici une macro qui devrait faire l'affaire :
    Sub suppr_doublon()
    Application.ScreenUpdating = False
    For i = 2 To Range("C65536").End(xlUp).Row
        If Range("C" & i).Value <> "" And Range("D" & i).Value <> "" Then
            cod = Range("C" & i).Value
            dest = Range("D" & i).Value
                Do While Range("C" & i + 1) = cod And Range("D" & i + 1).Value = dest
                Rows(i + 1).EntireRow.Delete
                Loop
        End If
    Next i
    End Sub
    


    A coller dans le module VBA de la feuille contenant le tableau à analyser puis l’exécuter

    Bonne journée

    Jc
    0