Discussion :

[kaboré1974]

Bonsoir à tous!
Je ne cesse de vous importuner avec mes multiples demandes. Mais comme vous êtes mon dernier recours, je n'ai pas le choix.
J'ai une table T_Personnel qui a trois champs: ID_Personnel; Nom et Prenom; Fonction. Le champ Fonction est une liste déroulante contenant Directeur, Adjoint, Gardien. J'ai un formulaire de saisie qui alimente la table T_Personnel. L'objectif est de saisir le personnel d'une école primaire.
Je voudrais que lorsque je saisie un nom et lui attribue la fonction Directeur, je ne puisse plus attribuer la même fonction Directeur à un autre. En somme, dans la liste du personnel, la fonction Directeur ne sera pas repétée, mais les autres OUI puisque dans les faits, il n'y a pas deux Directeurs dans une école primaire.
J'ai fait des recherches sur le Net, mais je n'ai eu gain de cause.
Je demande donc votre aide.

[f-leb]

Bonsoir,

Tu as un évènement BeforeUpdate sur le contrôle qui se déclenche avant la mise à jour de la donnée. En gros, cela donnerait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub lst_Fonction_BeforeUpdate(Cancel As Integer) 
 If(DCount("*", "T_Personnel", "fonction='Directeur'") > 0) Then ' s'il y a déjà un directeur
   MsgBox "Il ne peut y en avoir qu'un !" 
   Cancel = True 
   Me!lst_Fonction.Undo 
 End If 
End Sub

[kaboré1974]

Merci à Monsieur f_leb pour l'intérêt accordé à ma préoccupation. Mais votre réponse ne semble pas marcher car dès que j'attribue la fonction Directeur, le Msgbox prévu apparaît et si je clique sur OK la fonction est acceptée. Si je prend une autre fonction, c'est le même comportement dès que je clique sur OK. J'ai mis le code dans l'évènement après MAJ du contrôle de la liste déroulante fonction qui est sur le formulaire.
Je voudrais que la fonction Directeur soit acceptée une seule fois. En cliquant sur OK, que le champ se vide.
Merci pour ce qui est déjà fait.

[f-leb]

[...] J'ai mis le code dans l'évènement après MAJ du contrôle de la liste déroulante fonction qui est sur le formulaire.

C'est sur l'évènement avant MAJ (BeforeUpdate) qu'il faut mettre le code.