XL 2021 Doublons

EdoudouVDM · Dimanche à 13:04

Bonjour,

Je souhaite supprimer des doublons mais dans une séquence, c'est à dire, deux lignes identique par le mot de la première colonne, je ne veux que supprimer la deuxième ligne.

Exemple sur cette image, je voudrais que la deuxième "montée de balle" soit supprimée. Le but est d'avoir toujours le même cycle de la première colonne (Attaque/Repli/Défense/Montée de balle) et que je puisse calculer les différences de temps entre les phases de jeu.

Je ne sais pas si je suis clair, merci d'avance de votre aide.

Bonne journée.

sylvanu · Dimanche à 13:07

Bonjour Edoudou,
Possible avec une macro VBA, si vous acceptez le VBA.
Par contre un petit fichier test serait le bienvenu, XL ne traite pas les images.
En Pj un essai au pif avec :

VB:

Sub Nettoie()
    Dim T, T2, L%, i%
    T = [A1].CurrentRegion
    ReDim T2(1 To UBound(T))
    [A1].CurrentRegion.Clear
    T2(1) = T(1, 1) ' init matrice
    L = 2
    For i = 2 To UBound(T)
        If T(i, 1) <> T(i - 1, 1) Then
            T2(L) = T(i, 1) ' si différent on copie
            L = L + 1
        End If
    Next i
    [A1].Resize(UBound(T2), 1).Value = Application.Transpose(T2)
End Sub

XL 2021 Doublons

EdoudouVDM

XLDnaute Nouveau

Pièces jointes

sylvanu

XLDnaute Barbatruc

Pièces jointes

Discussions similaires