Dans une liste modifiable, la valeur "Limiter à liste" est sur oui, et c'est
très bien ainsi.
Toutefois, sur la valeur "Not in list" j'ai mis un message de mon cru.
Private Sub ListeNrRéfFournisseur_NotInList(NewData As String, Response As
Integer)
réponse = MsgBox("Ce numéro de référence n'existe pas dans la base de
données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit,
introduisez d'abord son nom.", vbInformation, "Erreur de numéro de
référence")
End Sub
Ce qui me dérange, c'est qu'après mon message, le message "classique"
stipulant que la valeur introduite n'est pas dans la liste apparaît. Cela
fait double emploi. Comment faire pour éviter l'affichage de ce message ?
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
Eric
re Jean-Marc
mets : MsgBox "Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence"
PS : pas utile d'utiliser la fonction MsgBox() car tu n'utilises pas la valeur du bouton cliqué
"Jean-Marc" écrivait news:#:
Salut à tous,
Dans une liste modifiable, la valeur "Limiter à liste" est sur oui, et c'est très bien ainsi. Toutefois, sur la valeur "Not in list" j'ai mis un message de mon cru.
Private Sub ListeNrRéfFournisseur_NotInList(NewData As String, Response As Integer) réponse = MsgBox("Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence") End Sub
Ce qui me dérange, c'est qu'après mon message, le message "classique" stipulant que la valeur introduite n'est pas dans la liste apparaît. Cela fait double emploi. Comment faire pour éviter l'affichage de ce message ?
Merci de vos z'avis z'avisés,
Jean-Marc
re Jean-Marc
mets :
MsgBox "Ce numéro de référence n'existe pas dans la base de
données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit,
introduisez d'abord son nom.", vbInformation, "Erreur de numéro de
référence"
Dans une liste modifiable, la valeur "Limiter à liste" est sur oui, et
c'est très bien ainsi.
Toutefois, sur la valeur "Not in list" j'ai mis un message de mon cru.
Private Sub ListeNrRéfFournisseur_NotInList(NewData As String,
Response As Integer)
réponse = MsgBox("Ce numéro de référence n'existe pas dans la base de
données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit,
introduisez d'abord son nom.", vbInformation, "Erreur de numéro de
référence")
End Sub
Ce qui me dérange, c'est qu'après mon message, le message "classique"
stipulant que la valeur introduite n'est pas dans la liste apparaît.
Cela fait double emploi. Comment faire pour éviter l'affichage de ce
message ?
mets : MsgBox "Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence"
PS : pas utile d'utiliser la fonction MsgBox() car tu n'utilises pas la valeur du bouton cliqué
"Jean-Marc" écrivait news:#:
Salut à tous,
Dans une liste modifiable, la valeur "Limiter à liste" est sur oui, et c'est très bien ainsi. Toutefois, sur la valeur "Not in list" j'ai mis un message de mon cru.
Private Sub ListeNrRéfFournisseur_NotInList(NewData As String, Response As Integer) réponse = MsgBox("Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence") End Sub
Ce qui me dérange, c'est qu'après mon message, le message "classique" stipulant que la valeur introduite n'est pas dans la liste apparaît. Cela fait double emploi. Comment faire pour éviter l'affichage de ce message ?
Merci de vos z'avis z'avisés,
Jean-Marc
Jean-Marc
Merci Eric
"Eric" a écrit dans le message de news:
re Jean-Marc
mets : MsgBox "Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence"
PS : pas utile d'utiliser la fonction MsgBox() car tu n'utilises pas la valeur du bouton cliqué
"Jean-Marc" écrivait news:#:
Salut à tous,
Dans une liste modifiable, la valeur "Limiter à liste" est sur oui, et c'est très bien ainsi. Toutefois, sur la valeur "Not in list" j'ai mis un message de mon cru.
Private Sub ListeNrRéfFournisseur_NotInList(NewData As String, Response As Integer) réponse = MsgBox("Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence") End Sub
Ce qui me dérange, c'est qu'après mon message, le message "classique" stipulant que la valeur introduite n'est pas dans la liste apparaît. Cela fait double emploi. Comment faire pour éviter l'affichage de ce message ?
Merci de vos z'avis z'avisés,
Jean-Marc
Merci Eric
"Eric" <f_framZZ@hotmail.com> a écrit dans le message de
news:XnF95C0D787CDC5FfframZZhotmailcom@207.46.248.16...
re Jean-Marc
mets :
MsgBox "Ce numéro de référence n'existe pas dans la base de
données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit,
introduisez d'abord son nom.", vbInformation, "Erreur de numéro de
référence"
Dans une liste modifiable, la valeur "Limiter à liste" est sur oui, et
c'est très bien ainsi.
Toutefois, sur la valeur "Not in list" j'ai mis un message de mon cru.
Private Sub ListeNrRéfFournisseur_NotInList(NewData As String,
Response As Integer)
réponse = MsgBox("Ce numéro de référence n'existe pas dans la base de
données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit,
introduisez d'abord son nom.", vbInformation, "Erreur de numéro de
référence")
End Sub
Ce qui me dérange, c'est qu'après mon message, le message "classique"
stipulant que la valeur introduite n'est pas dans la liste apparaît.
Cela fait double emploi. Comment faire pour éviter l'affichage de ce
message ?
mets : MsgBox "Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence"
PS : pas utile d'utiliser la fonction MsgBox() car tu n'utilises pas la valeur du bouton cliqué
"Jean-Marc" écrivait news:#:
Salut à tous,
Dans une liste modifiable, la valeur "Limiter à liste" est sur oui, et c'est très bien ainsi. Toutefois, sur la valeur "Not in list" j'ai mis un message de mon cru.
Private Sub ListeNrRéfFournisseur_NotInList(NewData As String, Response As Integer) réponse = MsgBox("Ce numéro de référence n'existe pas dans la base de données." & Chr(10) & Chr(13) & "Pour introduire un nouveau produit, introduisez d'abord son nom.", vbInformation, "Erreur de numéro de référence") End Sub
Ce qui me dérange, c'est qu'après mon message, le message "classique" stipulant que la valeur introduite n'est pas dans la liste apparaît. Cela fait double emploi. Comment faire pour éviter l'affichage de ce message ?
