Supression de doublon dans excel

Résolu
patdaoust -  
wilfried_42 Messages postés 912 Statut Contributeur -
Je recherche une façon d'éliminer les doublons dans un ficher excel. Il faut vérifier la date et l'heure + ou - 3 seconde. Ensuite suprimer la ligne.

2007-01-04 13:54:30 Incoming
2007-01-04 13:54:30 Incoming
2007-01-04 20:48:06 Incoming
2007-01-04 20:48:07 Incoming
2007-01-04 23:42:29 Incoming
2007-01-04 23:42:31 Incoming
2007-01-05 19:12:52 Incoming
2007-01-05 19:12:52 Incoming
2007-01-06 00:41:30 Incoming
2007-01-06 00:41:31 Incoming
2007-01-06 21:18:26 Incoming
2007-01-06 21:18:27 Incoming
2007-01-07 14:16:11 Incoming
2007-01-07 15:19:58 Incoming
2007-01-07 15:19:58 Incoming
2007-01-07 17:35:37 Incoming

merci pour l'aide
Configuration: Windows XP
Internet Explorer 6.0

6 réponses

  1. wilfried_42 Messages postés 912 Statut Contributeur 245
     
    Bonjour,

    tu n'aurais pas un fichier exemple, avec sa structure et quelques exemples ?
    on te met la macro dessus et on te le renvoie

    @ te lire
    0
    1. patdaoust
       
      comment vous faire parvenir le ficher?
      0
  2. wilfried_42 Messages postés 912 Statut Contributeur 245
     
    re:

    tu vas sur ce cite : https://www.cjoint.com/
    tu charges ton fichier, creer le lien, à la page suivante, il t'affiche un lien, tu le copies colle ici
    0
  3. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    je peux wilfried ? ;-)

    Tu peux le faire avec en M2 :
    =SI(C2+D2-C1-D1<CNUM("00:03:00");"doublon";"ok")
    à recopier vers le bas.
    M2 te retourne #VALEUR mais est à garder de toute façon.
    Il te reste à ajouter un filtre automatique et filtrer en M sur 'doublon'.
    Sélectionner la 1ère ligne à éliminer, clic sur la dernière et clic-droit 'supprimer'
    eric
    0
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. wilfried_42 Messages postés 912 Statut Contributeur 245
     
    re: Bonjour eric

    Eric tu peux sans probleme, je ne suis pas éternellement connecté lol

    ton fichier en retour, avec un bouton lié à une macro
    https://www.cjoint.com/?jttvQ7Qy4V

    Voici la macro :
    Sub Go_macro()
        Range("M3").Formula = "=IF(abs(l3-l2)<=(""00:00:03"" *1),""NON"",""OUI"")"
        Range("M3:M" & Range("D65536").End(xlUp).Row).FillDown
        Range("A1").AutoFilter Field:=13, Criteria1:="NON"
        Range("D2:D" & Range("D65536").End(xlUp).Row).Cells.SpecialCells(xlCellTypeVisible).EntireRow.Delete
        Range("A1").AutoFilter
        Range("M:M").ClearContents
    End Sub

    0
    1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      re wilfried,

      hummm, tu t'es basé sur la colonne L et j'ai l'impression que cette durée n'est liée au delta entre 2 temps...
      Il y a une vingtaine de détections différentes entre nos 2 solutions (lignes 55, 60, 64 par exemple)
      Mais comme le demandeur a mis en résolu sans un mot pas sûr qu'il revienne...
      eric
      0
  6. wilfried_42 Messages postés 912 Statut Contributeur 245
     
    re: eric

    je crois que tu as raison mais il a du faire la correction tout seul lol

    à +
    0