Excel doublons

Résolu
SuperFun Messages postés 850 Date d'inscription   Statut Membre Dernière intervention   -  
mbodj Messages postés 2 Statut Membre -
Bonjour tout le monde va bien? c'est bien,

Ben voila moi j'ai une petite question relative à Excel 2010.

J'ai une colonne avec des données et j'aimerai supprimer les doublons.

Pour cela il existe une fonction supprimer les doublons et hop les doublons sont supprimés.

MAIS MOI ce que je voudrai c'est qu'il supprime les 2 valeurs à double.

Exemple si à la cellule A33 j'ai "Pommes" et qu'à la cellule A127 j'ai "Pommes", moi je veux supprimer les 2 cellules (A33 et A127)

Euh il y a une solution à ça?

Moi j'ai cherché et rien trouvé.

Merci à celui ou celle qui me donnera la solution, et pour les autres euh ben merci aussi si vous avez de bons tuyaux.



--
Si vous avez besoin de quelque chose, appelez-moi. Je vous dirai comment vous en passer.

9 réponses

  1.
    Apatik Messages postés 6040 Statut Contributeur 789
     
    Salut,

    J'ai pas de solution hyper rapide, mais en 5 minutes, voila comment je ferrais:

    - Un tri sur la colonne dans laquelle tu veux repérer les doublons. (mettons "A ").
    - Tu insère une colonne B
    - En B1, tu insères la formule "=SI(A1=B1;VRAI;FAUX), puis tu étires jusqu'en bas.
    - Puis tu insères une colonne C
    - En C2 tu insères la formule "=SI(OU(B2=VRAI;ET(B2=FAUX;B1=VRAI));VRAI;FAUX), puis tu étire jusqu'en bas.
    - Il reste la cellule C1 à remplir: "=B1"
    -Tu copie la colonne C, puis tu fait un collage spécial "valeur".
    - Tu fais un tri sur la colonne C, puis tu supprime toutes les lignes ou "Vrai" apparait dans la colonne C

    Voila!
    0
    1. SuperFun Messages postés 850 Date d'inscription   Statut Membre Dernière intervention   36
       
      Voila testé et je n'ai que des valeurs 0 dans mes colonnes B et C après collage spécial "valeurs" je l ai collé en C et après refais mais en D et toujours que des 0

      Jean déduit et moi aussi marche pas bien mais ne désespère pas
      0
  2. pépé35530 Messages postés 2951 Date d'inscription   Statut Membre Dernière intervention   1 390
     
    Bonjour,

    Créer une colonne avec la formule suivante :

    =NB.SI($A$2:$A$10;A2)

    A adapter en fonction de la plage des données
    recopier vers le bas

    Créer une autre colonne avec la formule suivante :

    =SI(B2>=2;"";A2)

    Recopier vers le bas
    Dans cette colonne n'apparaîtront que les éléments en 1 exemplaire.

    On peut ensuite faire un copier-collage spécial, valeurs des données de cette colonne si on veut une nouvelle liste avec simplement ces données.

    A+

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

      On peut éviter la 2nde colonne.

      Filtrer automatique sur la colonne ayant =NB.SI($A$2:$A$10;A2) avec pour critère > 1,
      et supprimer les lignes.

      eric
      0
    2. SuperFun Messages postés 850 Date d'inscription   Statut Membre Dernière intervention   36
       
      Testé et je retrouve exactement la même chose en colonne C que dans la colonne a tester (A)


      quand au filtrage auto avec critère >1 cela me dit Référence non valide
      0
  3. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Salut le fil,

    Peut être en VBA avec ce code qui ne conservera que les valeurs uniques

    Sub Val_Unique()
    Dim Finlig, i As Long
    Dim c, plage As Range
    Dim T() As String
    Application.ScreenUpdating = False
    ReDim T(1)
    With ActiveSheet 'Sheets("Feuil3") 'à adapter
    Finlig = .Cells(Rows.Count, "A").End(xlUp).Row
    For Each c In .Range("A1:A" & Finlig)
    If Application.CountIf(.Range("A1:A" & Finlig), c) > 1 Then
    T(UBound(T)) = c.Address
    ReDim Preserve T(UBound(T) + 1)
    End If
    Next c
    If UBound(T) > 1 Then
    Set plage = .Range(T(1))
    For i = 2 To UBound(T) - 1
    Set plage = Union(plage, .Range(T(i)))
    Next i
    plage.EntireRow.Delete
    End If
    End With
    End Sub

    0
    1. SuperFun Messages postés 850 Date d'inscription   Statut Membre Dernière intervention   36
       
      Dit tonton pourquoi tu tousse.... je suis loin d'être un As plutôt un Âne moi....

      Je m'enfile ça ou et comment ???
      0
  4. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Re,

    Je ne sais pas comment tu testes mais ça marche très bien...

    Sur le fichier joint j'ai filtré sur 'est supérieur à' : 1
    Il ne reste plus qu'à sélectionner les lignes visible, faire un clic-droit et 'supprimer la ligne'.
    En enlevant le filtre il ne reste que les valeurs individuelles.
    https://www.cjoint.com/?BImlXpaCq86

    eric
    0

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

    Posez votre question
  6. Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 147
     
    Re,

    pour répondre à ta demande, je site "Pour cela il existe une fonction supprimer les doublons et hop les doublons sont supprimés"
    Il n'y a que le VBA sinon manuellement avec des formules proposées.
    Maintenant si tu n'as pas de notion en VBA cela complique la démarche.
    tout de même un fichier exemple que tu peux tester, tu saisis des données en colonne A avec des doublons et clic sur le bouton, toutes les données en doublons et comme tu le dis si bien et hop supprimées

    https://www.cjoint.com/?BImoDMqQrHT
    0
  8. SuperFun Messages postés 850 Date d'inscription   Statut Membre Dernière intervention   36
     
    Bonjour,

    MERCI à tous, pépé35530, Mike-31, eriiic et Apatik aussi.

    Tous marchent il suffisait de le faire comme il faut, n'étant pas un grand spécialiste il a fallu du temps et surtout VOS exemples qui sont une pure merveille.

    Donc encore une fois MERCI à vous.

    Si vous avez besoin de quelque chose, appelez-moi. Je vous dirai comment vous en passer.
    0
  9. mbodj Messages postés 2 Statut Membre
     
    bonsoir
    0
  10. mbodj Messages postés 2 Statut Membre
     
    bonsoir comment sava quelle est sa maison
    0