OVH Cloud OVH Cloud

Syntaxe avec DLookup

2 réponses
Avatar
Eric RENAUD
Bonjour,

J'ai la ligne suivante :
MyVal = DLookup("[Nb de fiches anomalies]", "Qualité", "Libellé='Gespac'")
A présent je souhaite que le critère soit passer en variable

MyClient="Gespac"
Et là j'ai un problème de syntaxe
Il semble qu'avec une variable Numérique cela fonctionne mais une variable
de type String je n'y arrive
Est-ce normal ?

....,"Libellé=" & MyClient)

2 réponses

Avatar
Eric RENAUD
Désolé de ce dérangement mais j'ai fini par trouver.
C'était un problème d'espace avec les cotes et double-quotes.
La syntaxe pour ceux que cela intéresse.

Sub Extrait()
Dim MyClient As Variant, MyVal As Variant
MyClient = "Gespac"
MyVal = DLookup("[Nb de fiches anomalies]", "Qualité", "Libellé='" &
MyClient & "'")
End Sub

"Eric RENAUD" a écrit dans le message de news:

Bonjour,

J'ai la ligne suivante :
MyVal = DLookup("[Nb de fiches anomalies]", "Qualité", "Libellé='Gespac'")
A présent je souhaite que le critère soit passer en variable

MyClient="Gespac"
Et là j'ai un problème de syntaxe
Il semble qu'avec une variable Numérique cela fonctionne mais une variable
de type String je n'y arrive
Est-ce normal ?

....,"Libellé=" & MyClient)





Avatar
Raymond [mvp]
Bonjour.
si Libellé est numérique:
MyVal = DLookup("[Nb de fiches anomalies]", "Qualité", "[Libellé] = " &
MyClient)
si Libellé est alpha:
MyVal = DLookup("[Nb de fiches anomalies]", "Qualité", "[Libellé] = '" &
MyClient & "'")

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


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

J'ai la ligne suivante :
MyVal = DLookup("[Nb de fiches anomalies]", "Qualité", "Libellé='Gespac'")
A présent je souhaite que le critère soit passer en variable

MyClient="Gespac"
Et là j'ai un problème de syntaxe
Il semble qu'avec une variable Numérique cela fonctionne mais une variable
de type String je n'y arrive
Est-ce normal ?

....,"Libellé=" & MyClient)