OVH Cloud OVH Cloud

Dlookup à 2 critères

5 réponses
Avatar
Jo
Bonjour!

Je ne comprend plus rien.

J'essaie de faire un Dlookup =E0 2 crit=E8res, s=E9par=E9ment, =E7a=20
fonctionne tr=E8s bien :

If Not IsNull(DLookup("[No]", "USAGERgmf", "[CodeGMF] =3D=20
Forms!USAGER!USAGERgmf![CodeGMF]")) Then
=20
If Not IsNull(DLookup("[No]", "USAGERgmf", "[Nam] =3D '" &=20
Forms!USAGER!USAGERgmf![Nam] & "'")) Then

mais d=E8s que je les met ensemble :

If Not IsNull(DLookup("[No]", "USAGERgmf", "[CodeGMF] =3D=20
Forms!USAGER!USAGERgmf![CodeGMF]" And "[Nam] =3D '" & Forms!
USAGER!USAGERgmf![Nam] & "'")) Then

j'ai le message Erreur d'ex=E9cution no 13, incompatibilit=E9=20
de type.
Qu'est-ce que je fais de mal?

Johanne

5 réponses

Avatar
3stone
Salut,

"Jo" a écrit:

mais dès que je les met ensemble :

If Not IsNull(DLookup("[No]", "USAGERgmf", "[CodeGMF] Forms!USAGER!USAGERgmf![CodeGMF]" And "[Nam] = '" & Forms!
USAGER!USAGERgmf![Nam] & "'")) Then



If Not IsNull(DLookup("[No]", "USAGERgmf", "[CodeGMF] ="
& Forms!USAGER!USAGERgmf![CodeGMF]
& " And [Nam] = '" & Forms!USAGER!USAGERgmf![Nam] & "'")) Then

le tout sur une ligne et pour autant que [CodeGMF] soit numérique et [Nam] du texte...



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
Jo
Ça marche numéro 1

Merci beaucoup!!

Johanne
Avatar
Jo
Dans le même esprit,

peut-on faire un Dlookup pour aller chercher
l'enregistrement dont DateExamen est la plus récente et
que Nam soit égal à celui du formulaire

quelque chose comme:

If INRdesire = (DLookup("[INR]", "[Nam]" = '" & Forms!
USAGER![Nam] & "'")) and/where max([DateExamen]) then....
Avatar
3stone
Salut,

"Jo"
peut-on faire un Dlookup pour aller chercher
l'enregistrement dont DateExamen est la plus récente et
que Nam soit égal à celui du formulaire

quelque chose comme:

If INRdesire = (DLookup("[INR]", "[Nam]" = '" & Forms!
USAGER![Nam] & "'")) and/where max([DateExamen]) then....


Pour rechercher la plus grande valeur, ou ladate la plus récente, utilise un DMax...

= DMax("[DateExamen]";"[LaTable]";"[Nam]= '" & Forms!Usager![Nam] & "'")



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
Jo
Bonjour Pierre!
j'appécie beaucopup ton aide.

Mais ce que je veux, c'est vérifier la valeur d'un 3ième
chanp (INR) de la table avec les 2 critères NAM = form!
(Nam) et Dmax(DateExamen)

du style :

if Me.INRdésire = au INR de la table dont le NAM de la
table = Me.Nam et que c'est la date la plus récente de
DateExaamen de la table

Peut-on faire cela avec Dmax?

merci encore!