Liste déroulante

[halecs93]

Bonjour à toutes et à tous

Dans une feuille, j'ai plusieurs colonnes et pour chacune d'entre elles, des lignes.

Pour chaque colonne, je souhaite dans ces lignes, compléter les cellules par l'intermédiaire d'une liste déroulante. Mais lorsqu'un Item de cette liste a été choisi, je voudrais qu'il soit impossible à répéter dans cette même colonne.

....Merci pour vos lectures et réponses.

 

[DoubleZero]

Re : Liste déroulante

Bonjour, halecs93, le Forum,

Comme ceci ?

Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
    c.EntireColumn.Name = "zéro_doublon"
    If Application.WorksheetFunction.CountIf(Range("zéro_doublon"), c.Value) > 1 Then c = "": c.Select
End Sub

A bientôt 🙂

 

[halecs93]

Re : Liste déroulante

Bonjour.

Merci pour cette réponse.... je cherchais un éventuel moyen sans passer par du VBA.... ça pourrait se concevoir ?

 

[DoubleZero]

Re : Liste déroulante

Re-bonjour,

... sans passer par du VBA.... ça pourrait se concevoir ?

Peut-être... Mais je ne sais 🙁 comment procéder.

A bientôt 🙂

 

[halecs93]

Re : Liste déroulante

re-bonjour.....

Je pense avoir trouver une façon.... en utilisant la "validation de données" (personnalisée)


En tout cas, merci beaucoup