Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access DLookUp ?

DLookUp ?

5 réponses
Avatar
A COSTA
Bonjour,
J'ai une table "associées" avec "NrAssocié", "Nom", "Adresse", etc
Les propriétés de "NrAssocié" sont Fiel Name = NrAssocié, Date Type =
Number, Indexed = Yes(No Duplicates).
Je rempli la table à partir d'un form.
J'aimerais que quand j'inscrit un nouveau NrAssocié et s'il existe déjà,
avoir un message par ex. "Attention, ce numéro appartient au associé & Nom.
J'ai essayé ajouter une Text Box avec la fonction DLookUp mais je n'arrive
pas à avoir le bon résultat.
De l'aide, s.v.p.
Merci d'avance
A Costa
Signaler un problème avec ce contenu

5 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
Avatar
Pierre CFI [mvp]
bonjour
dans la textbox NrAssocié du méme champ
sur l'évenement beforeupdate
If dcount("*","associées" ,"NrAssocié =" & Me.NrAssocié.value & ) >0 then
msgbox "existe"
cancel = true
end if
--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"A COSTA" a écrit dans le message de news:
Bonjour,
J'ai une table "associées" avec "NrAssocié", "Nom", "Adresse", etc
Les propriétés de "NrAssocié" sont Fiel Name = NrAssocié, Date Type > Number, Indexed = Yes(No Duplicates).
Je rempli la table à partir d'un form.
J'aimerais que quand j'inscrit un nouveau NrAssocié et s'il existe déjà,
avoir un message par ex. "Attention, ce numéro appartient au associé & Nom.
J'ai essayé ajouter une Text Box avec la fonction DLookUp mais je n'arrive
pas à avoir le bon résultat.
De l'aide, s.v.p.
Merci d'avance
A Costa



Avatar
A COSTA
Merci pour l'aide mais ...
la premiere ligne vient rouge avec le message "Compile error Expected:
expession" et le cursor s'arrete dans le parentese
A Costa


bonjour
dans la textbox NrAssocié du méme champ
sur l'évenement beforeupdate
If dcount("*","associées" ,"NrAssocié =" & Me.NrAssocié.value & ) >0 then
msgbox "existe"
cancel = true
end if
--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"A COSTA" a écrit dans le message de news:
Bonjour,
J'ai une table "associées" avec "NrAssocié", "Nom", "Adresse", etc
Les propriétés de "NrAssocié" sont Fiel Name = NrAssocié, Date Type > > Number, Indexed = Yes(No Duplicates).
Je rempli la table à partir d'un form.
J'aimerais que quand j'inscrit un nouveau NrAssocié et s'il existe déjà,
avoir un message par ex. "Attention, ce numéro appartient au associé & Nom.
J'ai essayé ajouter une Text Box avec la fonction DLookUp mais je n'arrive
pas à avoir le bon résultat.
De l'aide, s.v.p.
Merci d'avance
A Costa








Avatar
Eric
Bonjour,


Enleves le & pour obtenir:
If DCount("*","associées" ,"NrAssocié =" & Me.NrAssocié ) >0 then

Merci pour l'aide mais ...
la premiere ligne vient rouge avec le message "Compile error Expected:
expession" et le cursor s'arrete dans le parentese
A Costa



bonjour
dans la textbox NrAssocié du méme champ
sur l'évenement beforeupdate
If dcount("*","associées" ,"NrAssocié =" & Me.NrAssocié.value & ) >0 then
msgbox "existe"
cancel = true
end if
--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr


Avatar
Pierre CFI [mvp]
merci, éric, j'ai répondu çà mais..... dans un autre fils
tu dis pas à pierrot_la_bieeeeere :o)

--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"Eric" a écrit dans le message de news: %
Bonjour,


Enleves le & pour obtenir:
If DCount("*","associées" ,"NrAssocié =" & Me.NrAssocié ) >0 then

Merci pour l'aide mais ...
la premiere ligne vient rouge avec le message "Compile error Expected: expession" et le cursor s'arrete dans le parentese
A Costa



bonjour
dans la textbox NrAssocié du méme champ
sur l'évenement beforeupdate
If dcount("*","associées" ,"NrAssocié =" & Me.NrAssocié.value & ) >0 then
msgbox "existe"
cancel = true
end if
--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr




Avatar
A COSTA
Merci à Eric et Pierre.
ça marche
A Costa


merci, éric, j'ai répondu çà mais..... dans un autre fils
tu dis pas à pierrot_la_bieeeeere :o)

--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"Eric" a écrit dans le message de news: %
Bonjour,


Enleves le & pour obtenir:
If DCount("*","associées" ,"NrAssocié =" & Me.NrAssocié ) >0 then

Merci pour l'aide mais ...
la premiere ligne vient rouge avec le message "Compile error Expected: expession" et le cursor s'arrete dans le parentese
A Costa



bonjour
dans la textbox NrAssocié du méme champ
sur l'évenement beforeupdate
If dcount("*","associées" ,"NrAssocié =" & Me.NrAssocié.value & ) >0 then
msgbox "existe"
cancel = true
end if
--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info




--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr