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

 1218293 visiteurs

 2 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 : Les mémos - Formulaires
Page lue 10004 fois

Vous êtes ici :   Accueil » Ajout à liste modifiable