Liste sans doublon avec la cellule adjacente liée

Bonjour,

Après recherche, je voudrais savoir s'il est possible de faire une liste sans doublon, et récupérer aussi la cellule adjacente ?

Avec une liste comme ça :

Chien    Carnivore
Chat    Carnivore
Chèvre     Herbivore
Mouton    Herbivore
chat    Carnivore
Lapin    Herbivore
Mouton    Herbivore
Chèvre     Herbivore

et le résultat serait ça :

Chien    Carnivore
Chat    Carnivore
Chèvre     Herbivore
Mouton    Herbivore
Lapin    Herbivore

j'ai essayé a partir du ficher de ce post :Excel du sujet : liste liee sans doublons

https://forum.excel-pratique.com/download/file.php?id=96617

Mais je n'ai pas réussi !

Si quelqu'un a une idée.

Merci d'avance.

Cordialement,

Roger.

Bonjour, je vous cite : "...si quelqu'un a une idée..."

Mais...si quelqu'un à une idée sur quoi ? Parce que si le sujet c'est la reproduction des escargots je suis contre car ils bavent trop et en mettent partout (ça rend le sol glissant) et vous qu'en pensez-vous ?

Bonjour

Bonjour Force rouge

Je ne savais pas que l'objet Dictionary était sensible à la casse

A tester

Sub test()
Dim J As Long
Dim Mondico As Object

  Set Mondico = CreateObject("Scripting.dictionary")
  Columns("C:D").ClearContents
    For J = 1 To Range("A" & Rows.Count).End(xlUp).Row
      Mondico(UCase(Range("A" & J).Value)) = Range("A" & J) & "/" & Range("B" & J).Value
    Next J
    With Range("C1").Resize(Mondico.Count)
      .Value = Application.Transpose(Mondico.items)
      .TextToColumns other:=True, otherchar:="/"
    End With
End Sub

Bonjour,

Une solution formules.

Cordialement.

Bonjour Banzaï...Très certainement parce que c'est une méthode et non une propriété. L'inverse aurait été sensible à la casse.

Sinon s'il n'y a que des mots et non des phrases, pourquoi ne pas utiliser chr(32) comme séparateur et par la suite, utiliser space:=true dans la fonction text to column ?

Edit : bonjour MFerrand

Bonjour,

Une autre solution avec formule

A+

Bonjour,

Les idées était sous entendu à ma demande plus haut, désolé si je n'étais pas assez clair.

Je n'étais pas du tout parti dans ces directions.

Merci pour vos réponses et vos idées, je vais déjà tester les solutions sans macro.

Cordialement,

Roger.