Microsoft 365 Petite question concernant les doublons :)

Miikaa · 25 Septembre 2019

Bonsoir à tous,

Petite question, j'aimerai créer un tableau (jusque là rien de compliqué) où, par exemple, si j'ai sélectionné une donnée exemple 12 dans mon menu déroulant, j'aimerai que dans les listes suivante (toujours en menu déroulant), que ce chiffre soit indisponible pour éviter les doublons.

J'espère avoir été clair dans ma question, et je vous remercie par avance
Je n'ai pas forcément besoin d'une grosse explication, mais juste, si un code existe et son nom, je ferai la suite
Maiiiis si quelqu'un veut m'expliquer je suis ouvert mais je m'y connait un minimum pour après pouvoir me débrouiller je pense

job75 · 25 Septembre 2019

Bonsoir Miikaa, bienvenue sur XLD,

Bravo, c'est un problème intéressant, il me semble que c'est la 1ère fois que je le vois sur ce forum.

Voyez le fichier joint et cette macro dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim plage As Range, a, e, liste$
Set plage = [A2:A22] 'plage à adapter
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20) 'liste à adapter
If Intersect(ActiveCell, plage) Is Nothing Then Exit Sub
For Each e In a
    liste = liste & "," & e
Next
liste = liste & "," 'pour encadrer
For Each e In plage
    liste = Replace(liste, "," & e & ",", ",")
Next
With ActiveCell.Validation
    .Delete
    If liste <> "," Then .Add xlValidateList, Formula1:=Mid(liste, 2, Len(liste) - 1)
End With
End Sub

A+

Miikaa · 25 Septembre 2019

Salut Job75 et merci !

C'est exactement ça que je veux, par contre, je ne vois vraiment pas comment l'incorporer !

Le mettre sous forme de liste déroulante, il n'y a aucun problème, colonne 1 à sélectionner autant que je veux, car répétition, mais colonne 2, si un chiffre est pris, de ne plus pouvoir le reprendre (soit caché le chiffre, soit une alerte ?)

Merci pour ton coups de pouce en tout cas

Victor21 · 25 Septembre 2019

Bonjour, Miikaa, Gérard.

Une proposition en pj par formules, adaptée d'une formule de Debra S. Dalgleish.

job75 · 25 Septembre 2019

Re, salut Patrick,

Je n'aurais pas du dire bravo, le fichier du post #3 n'a rien à voir avec le post #1, il n'y a pas de liste déroulante.

J'ai l'impression que vous ne savez pas ce qu'est une macro...

A+

Microsoft 365 Petite question concernant les doublons :)

Miikaa

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Pièces jointes

Miikaa

XLDnaute Nouveau

Pièces jointes

Victor21

XLDnaute Barbatruc

Pièces jointes

job75

XLDnaute Barbatruc

Discussions similaires