Aide spéciale pour Liste déroulante

[seb_519]

Bonjour,
je souhaite réaliser un petit programme de gestion de personnel
pour exemple, dans un restaurant/bar, on a 3 employés
-jean
-luc
-anne
et 3 postes
-barman
-serveur
-cuisinier
je souhaiterai créer une liste déroulante permettant de choisir quel poste donné à une personne, pour cela je réaliste une cellule liste déroulante avec le choix des employés en face de barman, la meme en face de serveur et encore la meme en face de cusinier.
C'est à ce moment la que cela se complique, je voudrais que une fois que j'ai choisi luc pour le bar par exemple, celui-ci s'efface des liste déroulantes suivante, étant donné qui ne peu pas etre à 2 tâches en meme temps.
Merci pour votre aide, répondez moi vite svp c'est urgent.

 

[abc]

Re : Aide spéciale pour Liste déroulante

Bonsoir,
a tester
Private Sub Worksheet_Change(ByVal Cellule As Excel.Range)
If Cellule.Column = 1 Or 2 Then
If Application.WorksheetFunction. _
CountIf(Range("A1:B12"), Cellule.Value) > 1 Then
MsgBox "HOLA,Je suis déja inscrit "
Cellule.Value = ""
Cellule.Select
End If
End If
End Sub
A +

 

[Marc77]

Re : Aide spéciale pour Liste déroulante

Bonsoir seb_519, abc et re le forum

Une solution avec un menu déroulant et des listes interactive avec fontion

 

[Banzai64]

Re : Aide spéciale pour Liste déroulante

Bonsoir

Sans aucun mérite une solution

Formation Excel VBA JB