Bien entendu c'est un problème Access qui m'amène.
J'ai une table A composée de plusieurs champs, je veux remplir cette table
via un formulaire. Dans ce formulaire j'ai créé une liste modifiable qui
m'affiche tous les champs d'une autre table B. Je souhaite pouvoir entrer à
partir de la liste modifiable du formulaire des valeurs qui sont dans ma
table B et les stocker dans le champ adéquat de la table A, mais aussi
écrire des valeurs nouvelles qui seront stockées dans le champ adéquat de la
table A mais AUSSI dans ma table B. J'ai bien noté que dans mon formulaire
je devais déclarer "limiter à la liste" dans les propriétés de ma liste de
choix et que je devais associer une procédure évennementielle pour mettre ma
table B à jour. Et c'est là que ça coince: je mets quoi dans ma procédure
évennementielle?
Merci.
Cordialement.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond
Bonjour.
Tu trouveras des exemples sur les pages suivantes: http://access.seneque.free.fr/notinlist.htm
un exemple de fonction NotInList pour ajouter un article dans la table:
Private Sub Articles_NotInList(NewData As String, _ Response As Integer) If MsgBox("L'article " & NewData & " n'existe pas." _ & vbCrLf & "Voulez-vous l'ajouter ?", _ vbYesNo, "Article inconnu") = vbYes Then Dim Rst As DAO.Recordset Set Rst = CurrentDb.OpenRecordset("ArticlesEtPrix") Rst.AddNew Rst!Catégories = Me![Catégorie] Rst!Dénomination = NewData Rst.Update Response = acDataErrAdded Rst.Close Set Rst = Nothing Else Response = acDataErrContinue End If End Sub
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"JM" a écrit dans le message de news:bjpu90$8gf$
Bonjour,
Bien entendu c'est un problème Access qui m'amène. J'ai une table A composée de plusieurs champs, je veux remplir cette table via un formulaire. Dans ce formulaire j'ai créé une liste modifiable qui m'affiche tous les champs d'une autre table B. Je souhaite pouvoir entrer à
partir de la liste modifiable du formulaire des valeurs qui sont dans ma table B et les stocker dans le champ adéquat de la table A, mais aussi écrire des valeurs nouvelles qui seront stockées dans le champ adéquat de la
table A mais AUSSI dans ma table B. J'ai bien noté que dans mon formulaire je devais déclarer "limiter à la liste" dans les propriétés de ma liste de choix et que je devais associer une procédure évennementielle pour mettre ma
table B à jour. Et c'est là que ça coince: je mets quoi dans ma procédure évennementielle? Merci. Cordialement.
Bonjour.
Tu trouveras des exemples sur les pages suivantes:
http://access.seneque.free.fr/notinlist.htm
un exemple de fonction NotInList pour ajouter un article dans la table:
Private Sub Articles_NotInList(NewData As String, _
Response As Integer)
If MsgBox("L'article " & NewData & " n'existe pas." _
& vbCrLf & "Voulez-vous l'ajouter ?", _
vbYesNo, "Article inconnu") = vbYes Then
Dim Rst As DAO.Recordset
Set Rst = CurrentDb.OpenRecordset("ArticlesEtPrix")
Rst.AddNew
Rst!Catégories = Me![Catégorie]
Rst!Dénomination = NewData
Rst.Update
Response = acDataErrAdded
Rst.Close
Set Rst = Nothing
Else
Response = acDataErrContinue
End If
End Sub
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"JM" <jm.chevreuil@groupe-serta.com> a écrit dans le message de
news:bjpu90$8gf$1@news-reader5.wanadoo.fr...
Bonjour,
Bien entendu c'est un problème Access qui m'amène.
J'ai une table A composée de plusieurs champs, je veux remplir cette table
via un formulaire. Dans ce formulaire j'ai créé une liste modifiable qui
m'affiche tous les champs d'une autre table B. Je souhaite pouvoir entrer
à
partir de la liste modifiable du formulaire des valeurs qui sont dans ma
table B et les stocker dans le champ adéquat de la table A, mais aussi
écrire des valeurs nouvelles qui seront stockées dans le champ adéquat de
la
table A mais AUSSI dans ma table B. J'ai bien noté que dans mon formulaire
je devais déclarer "limiter à la liste" dans les propriétés de ma liste de
choix et que je devais associer une procédure évennementielle pour mettre
ma
table B à jour. Et c'est là que ça coince: je mets quoi dans ma procédure
évennementielle?
Merci.
Cordialement.
Tu trouveras des exemples sur les pages suivantes: http://access.seneque.free.fr/notinlist.htm
un exemple de fonction NotInList pour ajouter un article dans la table:
Private Sub Articles_NotInList(NewData As String, _ Response As Integer) If MsgBox("L'article " & NewData & " n'existe pas." _ & vbCrLf & "Voulez-vous l'ajouter ?", _ vbYesNo, "Article inconnu") = vbYes Then Dim Rst As DAO.Recordset Set Rst = CurrentDb.OpenRecordset("ArticlesEtPrix") Rst.AddNew Rst!Catégories = Me![Catégorie] Rst!Dénomination = NewData Rst.Update Response = acDataErrAdded Rst.Close Set Rst = Nothing Else Response = acDataErrContinue End If End Sub
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"JM" a écrit dans le message de news:bjpu90$8gf$
Bonjour,
Bien entendu c'est un problème Access qui m'amène. J'ai une table A composée de plusieurs champs, je veux remplir cette table via un formulaire. Dans ce formulaire j'ai créé une liste modifiable qui m'affiche tous les champs d'une autre table B. Je souhaite pouvoir entrer à
partir de la liste modifiable du formulaire des valeurs qui sont dans ma table B et les stocker dans le champ adéquat de la table A, mais aussi écrire des valeurs nouvelles qui seront stockées dans le champ adéquat de la
table A mais AUSSI dans ma table B. J'ai bien noté que dans mon formulaire je devais déclarer "limiter à la liste" dans les propriétés de ma liste de choix et que je devais associer une procédure évennementielle pour mettre ma
table B à jour. Et c'est là que ça coince: je mets quoi dans ma procédure évennementielle? Merci. Cordialement.