ID avec plusieurs lignes, garder une seule ligne en fonction d'un score

Bonjour,

Je me retrouve complètement bloqué dans mon travaille, aucune solution trouvé ce week end je deviens fou.

Le fichier excel est issu d'une extraction de base de données de garagistes qui contient plusieurs dizaine de millier de lignes.

2021 05 09 18 26 14 window

J'ai besoin de faire un choix sur le domain_id ( c'est le site internet du garagiste) , par rapport à son caption ( son activité) en fonction de son score ( le plus élevé)

Par exemple sur le domain_id : 30 il est déclaré comme ayant une caption "Seg3-MRA" avec un score de "5" ET "Seg4-AgentsMarque" avec un score de" 1 "
Ici je ne souhaite gardé que Seg3-MRA car c'est le plus élevé.

Ce que je souhaite c'est d'avoir une colonne supplémentaire Vrai/Faux.

2021 05 09 18 54 11 window

Merci d'avance !

Bonjour et bienvenue,

Merci de joindre un petit fichier et de préciser ta version Excel.

Cdlt.

Merci Jean Eric,

Office 2019

Un petit exemple du fichier

15classeur1.xlsx (8.86 Ko)

Bonjour à tous,

Vois ceci :

Sub test()
    Dim a, b, i As Long, dico As Object
    Set dico = CreateObject("Scripting.Dictionary")
    With Sheets("Feuil1").Cells(1).CurrentRegion.Resize(, 7)
        a = .Value
        .Columns(7).Offset(1).ClearContents
        b = .Columns(7).Value
        For i = 2 To UBound(a, 1)
            If Not dico.exists(a(i, 2)) Then
                dico(a(i, 2)) = a(i, 6)
            Else
                dico(a(i, 2)) = Application.Max(dico(a(i, 2)), a(i, 6))
            End If
        Next
        For i = 2 To UBound(a, 1)
            If a(i, 6) = dico(a(i, 2)) Then
                b(i, 1) = "vrai"
            Else
                b(i, 1) = "faux"
            End If
        Next
        .Columns(7).Value = b
    End With
    Set dico = Nothing
End Sub

klin89

Rechercher des sujets similaires à "lignes garder seule ligne fonction score"