Liste déroulante sous conditions

Bonjour,

J'ai une liste de 10 personnes et il faut que je fasse des duos tout les jours. Pour éviter de saisir deux fois une personne j'aimerai qu'elle s'efface si elle est déjà sélectionné sur ce jour.

Merci de votre aide.

Je joins un fichier

bonjour

voici un exemple

cordialement

Bonjour,

Désole mais ça ne correspond pas à ma demande actuelle mais je garde ça sous la main.

Ma demande est la suivante : pour le jour 1 je dois avoir 5 duos par exemple

P1/P2

P3/P4

etc...

Et le problème se situe au niveau du choix des personnes : pour le 5ieme duos je ne peu pas saisir une personne qui est déjà dans un autre duo.

re

as tu pensé a remplacer mes tulipes 1....... par tes duos

sinon fait comme tout le monde , mets une pj pour voir sur piece

nb) pas une photo

J'ai déja mis un PJ lors de mon premier message et ce n'est pas des duos que je sélectionne mais des personnes unique pour constituer un duos

Bonjour,

Je vous joins un début de réponse, les colonne D et E peuvent être masquées,

Cordialement,

Bonjour merci pour cette réponse.

Je voulais savoir si il était possible de ne pas affiché les personnes dans la liste déroulante si elle ont déjà sélectionnée pour la journée.

Si la personne 1 est déjà inscrite en journée 1 alors elle n’apparaît plus dans la liste.

Bonjour,

c'est surement possible en se basant sur le fichier de tulipe et en créant 31 bases !

Peut être que Tulipe aura une meilleure solution ?,

Cordialement,

Impossible donc de déclarer que si personne 1 est déja sur une ligne avec en colonne A : "1" alors pour toutes les autres ligne avec "1" en colonne A on ne peut pas l'afficher ?

Je relance ma question : est-il possible de masquer un choix déjà effectuer sur une sélection de ligne ?

re

ça doit etre faisable (quand on cherche on trouve) ,fait une petite maquette stp pour bien voir le truc

cordialement

Voici un fichier test. Cela fait une heure que j'y suis je ne trouve rien...

Salut à tous,

J'ai testé un truc basique et relativement crassou mais qui pourrait toutefois correspondre à la demande :

bonjour

donc voila une tentative pour jour1 et 2 seulement

cordialement

Merci de vos réponses les deux fonctionne maintenant je vais donc devoir créer X listes ? Il n'y a pas un moyen plus rapide ?

J'ai eu une aide extérieur voici le code fourni (c'est juste excellent)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Set f = Sheets("feuil1")
  Set zsaisie = Range("B3:C382")
  If Not Intersect(zsaisie, Target) Is Nothing And Target.Count = 1 Then
    ligne = Target.Row
    jour = Cells(ligne, "a")
    Set d = CreateObject("scripting.dictionary")
    début = zsaisie.Row
    fin = début + zsaisie.Rows.Count - 1
    For i = début To fin
      If jour = Cells(i, "a") Then
        d(Cells(i, "b").Value) = ""
        d(Cells(i, "c").Value) = ""
      End If
    Next i
    Set d2 = CreateObject("scripting.dictionary")
    For Each c In [liste]
      If Not d.exists(c.Value) Then d2(c.Value) = ""
    Next c
    Me.ComboBox1.List = d2.keys
    Me.ComboBox1.Height = Target.Height + 3
    Me.ComboBox1.Width = Target.Width
    Me.ComboBox1.Top = Target.Top
    Me.ComboBox1.Left = Target.Left
    Me.ComboBox1 = Target
    Me.ComboBox1.Visible = True
    Me.ComboBox1.Activate
  Else
    Me.ComboBox1.Visible = False
  End If
End Sub
Private Sub ComboBox1_Click()
  ActiveCell = Me.ComboBox1
End Sub