Discussion :

[Cupidon]

Bonjour,
J'ai un formulaire avec plusieurs txt_box et combo_box.
Pour un combo box en particulier, j'aimerais mettre une ligne "ajouter" dans la liste déroulante permettant d'afficher un input box plutôt que de rajouter un bouton indépendant sur le formulaire.

Ainsi, si l'utilisateur ne trouve pas l'élément dans la liste déroulante, il se rend en bas de la liste et clique sur "ajouter" qui affiche un input box.

Est-ce que c'est possible en VBA Access?
Si oui, pouvez-vous me dire comment on fait?

[Invité]

Bonjour

C'est tout à fait possible, mais dépend de beaucoup de choses, par exemple si tu veux garder l'information pour la suite ou non.

Je t'invite d'abord à consulter la FAQ Access : http://access.developpez.com/faq/?page=zdl

Dans cette partie tu trouveras plusieurs choses, comme Not InList.

Philippe

[Cupidon]

Merci Philippe.
J'ai deux combo box.
Le premier donne la liste de la table T_brand. Si un élément n'existe pas dans la liste, je tape le nom et enter. Là, un deuxième form apparaît grâce à la fonction vers laquelle tu m'as orienté:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub cb_brand_NotInList(NewData As String, Response As Integer)
    If MsgBox("Voulez-vous ajouter " & NewData & " à la liste des brand ?", _
                       vbYesNo + vbQuestion + vbDefaultButton2, "Ajout") = vbYes Then
 
        DoCmd.OpenForm "F_retailer"
        Forms!F_retailer!txt_brand = NewData
 
    Else
        Response = acDataErrContinue
        cb_brand.Undo
    End If
End Sub

Sur ce deuxième form (retailer to be added), il y a un autre combo box qui donne la liste de la table T_retailer. La table T_brand est liée à T_retailer par id_retailer[T_brand] = id[T_retailer]. Lorsque j'ai choisi l'élément de T_retailer, j'ai un sub qui ajoute le nouvel élément brand dans la table T_brand en donnant id_retailer (choisi à travers le deuxième combo box) et le nom du nouveau brand. Ceci se fait convenablement. Je termine en fermant le deuxième form.



Lorsque je revient sur le premier form, le focus est toujours sur le nom du nouveau brand que j'avais tapé précédément mais celui-ci n'est pas rajouté dans la liste du combo box. Je suis obligé de chercher un autre brand dans la liste pour qu'il puisse l'updater.

Ma question est: comment faire pour qu'il update directement, une fois que j'ai validé le brand dans le deuxième form?