[AC-2007] Requete ajout dans liste déroulante [Résolu]

[brutus437]

Bonjour,

Toujours entrain de peaufiner mon aplli courrier...

J'ai dans un formulaire un champ "Dest" avec une liste déroulante liée à une table (TabDest) contenant la liste de mes destinataires issus des données de l"année passée. Lorsque que j'ajoute dans mon champs "Dest" une nouvelle donnée qui ne figures dans ma table (Tabdest) je voudrais que cette donnée soit réutilisable lors d'un nouvel enregistrement. J'ai essayé avec une requête "Ajout" mais cela ne fonctionne pas. Il semble que le fait que les 2 tables soient liées posent pb.

Merci de votre aide à tous

[ClaudeLELOUP]

Bonjour,

Ce que tu veux faire, c'est ajouter un nouveau choix dans une zone de liste ?

Connais-tu cet item de la FAQ ?

http://access.developpez.com/faq/?page=zdl#AbsDsListe

[brutus437]

Oui, absolument, je n'avais pas trouvé cette info dans les FAQ, je teste et te dis si cela convient.

merci de ton aide,

[brutus437]

J'ai essayer d'appliquer le code, sans succès, aucune action, pas de msgbox etc....

J'ai donc les données suivantes

- une table [TabDest] avec un champ [Dest0]
- un formulaire [Tabcourrierdepart] avec un champs liste déroulante [Dest1] dont le contenu est [TabDest].[Dest0]
Je laisse le choix à l'utilisateur d'uitliser la liste [Dest0] ou d'insérer ce qu'il veut.
je voudrais ensuite intégrer les nouveaux éléments insérés à la table [TabDest].[Dest0]

j'ai tenté d'appliquer le code suivant sans résultats, ni erreur, ni modification

Private Sub Dest1_NotInList(NewData As String, Response As Integer)
If MsgBox("Voulez-vous ajouter " & NewData & " à la liste des Destinataires ?", vbYesNo + vbQuestion + vbDefaultButton2, "Ajout") = vbYes Then
DoCmd.RunSQL "INSERT INTO TabDest ( Dest0 ) SELECT """ & NewData & """;"
Response = acDataErrAdded
Else
Response = acDataErrContinue
Dest1.Undo
End If
End Sub

[ClaudeLELOUP]

Je laisse le choix à l'utilisateur d'uitliser la liste [Dest0] ou d'insérer ce qu'il veut.

Pour que le mécanisme décrit dans la FAQ se déclenche, il faut que la propriété "limité à liste" soit "OUI"

Je comprends que tu l'as positionné à "Non" ---> l'événement "NotInList" ne se déclechera pas.

[dok flint]

Bonjour ,
j'ai essayé le code et il fonctionne , mais j'ai une une question en plus :
là par ce code nous entrons une donnée dans un champs de la liste (ou column)
mais si la liste a trois colonnes (civilité;nom ,prénom ) ?
Merci et A+

[ClaudeLELOUP]

Bonjour dok flint,

Alors, c'est un peu plus long :
par exemple
- il faut déclencher l'ouverture d'un formulaire pour accéder à la table ;
- l'utilisateur complète la table et referme ce formulaire ;
- provoquer le requery de la zone de liste ---> la nouvelle valeur est maintenant disponible ;
- mettre le contrôle du formulaire à jour ;
- repasser la main à l'utilisateur.

[dok flint]

Bonjour Claude ,
Merci c'est clair , on revient à une saisie
A+

[brutus437]

Évidemment, cela fonctionne mieux comme ça,

Encore merci