Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Access evenement sur saisie

evenement sur saisie

36 réponses
Avatar
URIANE
Bonjour,
J'ai un formulaire de saisie dont la clef est le numéro d'inscription, avec
Nom_Prénom, date de naissance, adresse etc.....le Nom_Prénom n'a aucun
verrou, ce que je souhaiterais c'est que si dans le cours des saisies à
venir l'utilisateur de la base saisi un candidat dont le Nom_Prénom existe
déjà, obtenir une alerte après mise à jour du champs du genre "Attention ce
candidat existe déjà" que la date de naissance du candidat et son adresse
s'affiche dans le message d'alerte" avec la question voulez-vous continuer
oui/non, oui il continue car la date de naissance et l'adresses sont
différentes, non il stop car c'est les mêmes coordonnées ???? est-ce
possible, si oui comment puis faire pour obtenir ce résultat ?
Par avance merci au(x) génie(s) qui m'apportera la solution .....
cordialement
Signaler un problème avec ce contenu

6 réponses

Supprimer
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
1 2 3 4
Avatar
Jessy Sempere
Bonjour

Copis de mon post précédent :

Ensuite dans le cas de ton code, si je saisi une personne qui n'existe pas
j'ai le mssg qui s'affiche qui me dis "Aucun élément similiaire détecté",
ça je voudrais ne pas l'avoir comment puis-je le désactiver ?


Pour ça, il te suffit de remplacer dans la fonction :
strMsg = "Aucun élément similaire..."
par :
strMsg = ""

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



Hello URIANE !

Pour éviter ce message, au lieu d'avoir (je reprends l'exemple de
Jessy, tu sauras adapter:

MsgBox fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)

tu peux mettre

Dim strMessage as String
strMessage=fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)
if strMessage<>"Aucune élément similaire détecté..." then msgbox
strMessage

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Jessy,
dans ton code lorsque le candidat n'est pas créé j'ai tout de même un message
qui s'affiche " Else
strMsg = "Aucun élément similaire détecté..."
je souhaite ne pas avoir ce message, car il y a beaucoups de candidats à
saisir et à la longue ca risque d'être pénible de voir ce message s'afficher
à chaque saisie et de devoir cliquer sur "ok" pour fermer la boîte de
dialogue.
Merci pour ton aide
cordialement


--
Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info






Avatar
URIANE
Bonjour à toi "Ze Titi" et merci, c'est chose faite
Ké Bonheur ce site de merveille !
"soupir d'aise"
cordialement
Avatar
ze Titi
Hello Jessy !

Vi, au temps pour moi, je n'avais pas lu tous les posts... J'ai péché,
j'expie... :/

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour

Copis de mon post précédent :

Ensuite dans le cas de ton code, si je saisi une personne qui n'existe pas
j'ai le mssg qui s'affiche qui me dis "Aucun élément similiaire détecté",
ça je voudrais ne pas l'avoir comment puis-je le désactiver ?


Pour ça, il te suffit de remplacer dans la fonction :
strMsg = "Aucun élément similaire..."
par :
strMsg = ""

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



Hello URIANE !

Pour éviter ce message, au lieu d'avoir (je reprends l'exemple de
Jessy, tu sauras adapter:

MsgBox fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)

tu peux mettre

Dim strMessage as String
strMessage=fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)
if strMessage<>"Aucune élément similaire détecté..." then msgbox
strMessage

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Jessy,
dans ton code lorsque le candidat n'est pas créé j'ai tout de même un
message qui s'affiche " Else
strMsg = "Aucun élément similaire détecté..."
je souhaite ne pas avoir ce message, car il y a beaucoups de candidats à
saisir et à la longue ca risque d'être pénible de voir ce message
s'afficher à chaque saisie et de devoir cliquer sur "ok" pour fermer la
boîte de dialogue.
Merci pour ton aide
cordialement


--
Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info






--
Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info



Avatar
Pierre CFI [mvp]
comme fabien, tu vas avoir droit à la photo qui fait peur (pas celle de
Chantal, mais celle du monstre) :o))

--
Pierre
MVP Access
***************************************
Conseils MPFA: http://www.mpfa.info/
*********************************************************
"ze Titi" a écrit dans le message de news:

Hello Jessy !

Vi, au temps pour moi, je n'avais pas lu tous les posts... J'ai péché,
j'expie... :/

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde tâche
de taper sur ton clavier :
Bonjour

Copis de mon post précédent :

Ensuite dans le cas de ton code, si je saisi une personne qui n'existe
pas j'ai le mssg qui s'affiche qui me dis "Aucun élément similiaire
détecté", ça je voudrais ne pas l'avoir comment puis-je le désactiver ?


Pour ça, il te suffit de remplacer dans la fonction :
strMsg = "Aucun élément similaire..."
par :
strMsg = ""

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



Hello URIANE !

Pour éviter ce message, au lieu d'avoir (je reprends l'exemple de Jessy,
tu sauras adapter:

MsgBox fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)

tu peux mettre

Dim strMessage as String
strMessage=fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)
if strMessage<>"Aucune élément similaire détecté..." then msgbox
strMessage

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Jessy,
dans ton code lorsque le candidat n'est pas créé j'ai tout de même un
message qui s'affiche " Else
strMsg = "Aucun élément similaire détecté..."
je souhaite ne pas avoir ce message, car il y a beaucoups de candidats
à saisir et à la longue ca risque d'être pénible de voir ce message
s'afficher à chaque saisie et de devoir cliquer sur "ok" pour fermer
la boîte de dialogue.
Merci pour ton aide
cordialement


--
Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info






--
Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info







Avatar
Jessy Sempere
comme fabien, tu vas avoir droit à la photo qui fait peur (pas celle de
Chantal, mais celle du monstre) :o))


Tiens, c'est bizarre... il ne me semblait pas t'avoir pris en photo...
hi hi hi ;-))
Bon ok, je retourne me coucher...

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------




--
Pierre
MVP Access
***************************************
Conseils MPFA: http://www.mpfa.info/
*********************************************************
"ze Titi" a écrit dans le message de news:

Hello Jessy !

Vi, au temps pour moi, je n'avais pas lu tous les posts... J'ai péché,
j'expie... :/

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde tâche
de taper sur ton clavier :
Bonjour

Copis de mon post précédent :

Ensuite dans le cas de ton code, si je saisi une personne qui n'existe
pas j'ai le mssg qui s'affiche qui me dis "Aucun élément similiaire
détecté", ça je voudrais ne pas l'avoir comment puis-je le désactiver ?


Pour ça, il te suffit de remplacer dans la fonction :
strMsg = "Aucun élément similaire..."
par :
strMsg = ""

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



Hello URIANE !

Pour éviter ce message, au lieu d'avoir (je reprends l'exemple de Jessy,
tu sauras adapter:

MsgBox fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)

tu peux mettre

Dim strMessage as String
strMessage=fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)
if strMessage<>"Aucune élément similaire détecté..." then msgbox
strMessage

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Jessy,
dans ton code lorsque le candidat n'est pas créé j'ai tout de même un
message qui s'affiche " Else
strMsg = "Aucun élément similaire détecté..."
je souhaite ne pas avoir ce message, car il y a beaucoups de candidats
à saisir et à la longue ca risque d'être pénible de voir ce message
s'afficher à chaque saisie et de devoir cliquer sur "ok" pour fermer
la boîte de dialogue.
Merci pour ton aide
cordialement


--
Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info






--
Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info












Avatar
Fabien
Bonjour (hé j'ai pas oublié cette fois ;-))
Si ça continu on va pouvoir monter un club de
ceuxquiontlaphotodumonstresurleurbureau
@+
Fabien
PS : Jessy : bonne sieste !

comme fabien, tu vas avoir droit à la photo qui fait peur (pas celle de
Chantal, mais celle du monstre) :o))


Tiens, c'est bizarre... il ne me semblait pas t'avoir pris en photo...
hi hi hi ;-))
Bon ok, je retourne me coucher...

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



--
Pierre
MVP Access
***************************************
Conseils MPFA: http://www.mpfa.info/
*********************************************************
"ze Titi" a écrit dans le message de news:

Hello Jessy !

Vi, au temps pour moi, je n'avais pas lu tous les posts... J'ai péché,
j'expie... :/

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde tâche
de taper sur ton clavier :
Bonjour

Copis de mon post précédent :

Ensuite dans le cas de ton code, si je saisi une personne qui n'existe
pas j'ai le mssg qui s'affiche qui me dis "Aucun élément similiaire
détecté", ça je voudrais ne pas l'avoir comment puis-je le désactiver ?
Pour ça, il te suffit de remplacer dans la fonction :

strMsg = "Aucun élément similaire..."
par :
strMsg = ""

@+
Jessy Sempere
------------------------------------
Site @ccess : http://access.fr.free.fr/
Pour l''''efficacité de tous :
http://www.mpfa.info/
------------------------------------



Hello URIANE !

Pour éviter ce message, au lieu d'avoir (je reprends l'exemple de Jessy,
tu sauras adapter:

MsgBox fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)

tu peux mettre

Dim strMessage as String
strMessage=fVerifMultiValue("tblPersonne", "NomPers", Me.NomPers,
"PrenomPer", Me.PrenomPer)
if strMessage<>"Aucune élément similaire détecté..." then msgbox
strMessage

En ce jour mémorable du mardi 13/03/2007, tu as entrepris la lourde
tâche de taper sur ton clavier :
Bonjour Jessy,
dans ton code lorsque le candidat n'est pas créé j'ai tout de même un
message qui s'affiche " Else
strMsg = "Aucun élément similaire détecté..."
je souhaite ne pas avoir ce message, car il y a beaucoups de candidats
à saisir et à la longue ca risque d'être pénible de voir ce message
s'afficher à chaque saisie et de devoir cliquer sur "ok" pour fermer
la boîte de dialogue.
Merci pour ton aide
cordialement
--

Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info



--


Cordialement,
Ze Titi

Tout pour réussir avec Access :
http://www.mpfa.info













1 2 3 4