En poursuivant votre navigation sur ce site, vous acceptez l'utilisation de cookies pour vous proposer des contenus et services adaptés. Mentions légales.

Recherche

Recherche

Les mémos

Je débute...

Visites

 1224618 visiteurs

 10 visiteurs en ligne

Nous contacter

Contact

Ajout à liste modifiable

Ajouter une valeur à une zone de liste modifiable

Lorsque la source de la zone de liste est une table ou une requête, il faut ajouter un enregistrement à la table source et ensuite rafraîchir la liste.

Penser à mettre la valeur "oui" sur la propriété "Limiter à la liste".

Private Sub Combo0_NotInList(NewData As String, Response As Integer)

    If msgbox("Voulez-vous ajouter la valeur " & NewData & " ?", _
                     vbYesNo + vbQuestion) = vbYes Then

        CurrentDb.Execute "INSERT INTO LaTable(LeChamp) " _
                                 & "SELECT """ & NewData & """ ;"

        Response = acDataErrAdded

    Else

        Response = acDataErrContinue

        Me!Combo0.Undo

    End If

End Sub

Catégorie : - Formulaires
Page lue 10031 fois
Vous êtes ici :   Accueil » Ajout à liste modifiable