J'ai un formulaire dont un des champs est une liste=20
modifiable issue d'une table.
J'ai : limit=E9 =E0 liste sur oui
Sur absence dans liste :
Lorsque l'op=E9rateur rentre une valeur nouvelle, je pose la=20
question pour l'ajouter =E0 la liste. Tout cela se passe=20
bien sauf que l'actualisation n'est pas accept=E9e:
Forms!nom_formulaire!nom_champ.requery=20
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
Michel Walsh
Salut,
Dans la procédure NotInList, il est préférable de retourner dans le second argument, Response en anglais, acDataErrAdded. On peut vérifier avec un DLookup avant de retourner ce résultat, un peu comme suit:
MsgBox "...pas là..."
If DésireAjouter Then
... Écrire le code pour ajouter l'item
' vérifier...
If IsNull(DLookup( ... ) ) Then
Response¬DataErrContinue
Else
Response¬DataErrAdded
End If
Else
Response= acDataErrDisplay
End If
On peut trouver, avec plus de détails, un exemple de code dans "Running Microsoft Access 2000" de John L. Viescas (également disponible en français), ou dans son "Inside Microsoft Access 2003". Chercher dans l'index pour "NotInList".
Espérant être utile, Vanderghast, Access MVP
"Patrice" wrote in message news:12ccf01c3f6ed$a48c0e30$ bonjour,
J'ai un formulaire dont un des champs est une liste modifiable issue d'une table.
J'ai : limité à liste sur oui
Sur absence dans liste : Lorsque l'opérateur rentre une valeur nouvelle, je pose la question pour l'ajouter à la liste. Tout cela se passe bien sauf que l'actualisation n'est pas acceptée: Forms!nom_formulaire!nom_champ.requery
Comment faire pour actualiser cette liste
Merci
Salut,
Dans la procédure NotInList, il est préférable de retourner dans le
second argument, Response en anglais, acDataErrAdded. On peut vérifier avec
un DLookup avant de retourner ce résultat, un peu comme suit:
MsgBox "...pas là..."
If DésireAjouter Then
... Écrire le code pour ajouter l'item
' vérifier...
If IsNull(DLookup( ... ) ) Then
Response¬DataErrContinue
Else
Response¬DataErrAdded
End If
Else
Response= acDataErrDisplay
End If
On peut trouver, avec plus de détails, un exemple de code dans "Running
Microsoft Access 2000" de John L. Viescas (également disponible en
français), ou dans son "Inside Microsoft Access 2003". Chercher dans l'index
pour "NotInList".
Espérant être utile,
Vanderghast, Access MVP
"Patrice" <anonymous@discussions.microsoft.com> wrote in message
news:12ccf01c3f6ed$a48c0e30$a001280a@phx.gbl...
bonjour,
J'ai un formulaire dont un des champs est une liste
modifiable issue d'une table.
J'ai : limité à liste sur oui
Sur absence dans liste :
Lorsque l'opérateur rentre une valeur nouvelle, je pose la
question pour l'ajouter à la liste. Tout cela se passe
bien sauf que l'actualisation n'est pas acceptée:
Forms!nom_formulaire!nom_champ.requery
Dans la procédure NotInList, il est préférable de retourner dans le second argument, Response en anglais, acDataErrAdded. On peut vérifier avec un DLookup avant de retourner ce résultat, un peu comme suit:
MsgBox "...pas là..."
If DésireAjouter Then
... Écrire le code pour ajouter l'item
' vérifier...
If IsNull(DLookup( ... ) ) Then
Response¬DataErrContinue
Else
Response¬DataErrAdded
End If
Else
Response= acDataErrDisplay
End If
On peut trouver, avec plus de détails, un exemple de code dans "Running Microsoft Access 2000" de John L. Viescas (également disponible en français), ou dans son "Inside Microsoft Access 2003". Chercher dans l'index pour "NotInList".
Espérant être utile, Vanderghast, Access MVP
"Patrice" wrote in message news:12ccf01c3f6ed$a48c0e30$ bonjour,
J'ai un formulaire dont un des champs est une liste modifiable issue d'une table.
J'ai : limité à liste sur oui
Sur absence dans liste : Lorsque l'opérateur rentre une valeur nouvelle, je pose la question pour l'ajouter à la liste. Tout cela se passe bien sauf que l'actualisation n'est pas acceptée: Forms!nom_formulaire!nom_champ.requery
