[AC-2003] Difficultés syntaxe VBA

[Cerisier]

L'instruction suivante fonctionne

Code :

Me.fondspropres = DLookup("[mtinitialht]", "[T_Financement]", "[lbfinancement] = 'fondspropres'")

L'instruction suivante fonctionne aussi

Code :

    Me.fondspropres = DLookup("[mtinitialht]", "[T_Financement]", "[iddemande]= " & Me.iddemande)

Si je veux avoir les 2 conditions simultanément malgré divers essais rien à faire , voici la dernière essayée avec erreur " Type de données incompatible "

Code :

Me.fondspropres = DLookup("[mtinitialht]", "[T_Financement]", "[iddemande]=' " & Me.iddemande & " ' And [lbfinancement] =  'fondspropres' ")

Y aurait il un tutoriel précisant les utilisations des " ' & etc
Un grand merci d'avance

[marot_r]

Code :

Me.fondspropres = DLookup("[mtinitialht]", "[T_Financement]", "[iddemande]=" & Me.iddemande & " And [lbfinancement] =  'fondspropres' ")

Il ne faut mettre des apostrophes (') ou des guillemets (") qu'autours des données de type texte.

A+

[LedZeppII]

Bonjour,

Si le champ iddemande est de type numérique entier long et le champ lbfinancement de type texte, ça devrait donner :

Code :

Me.fondspropres = DLookup("[mtinitialht]", "[T_Financement]", "[iddemande]= " & Me.iddemande & " And [lbfinancement] = 'fondspropres' ")

" délimite les chaînes de caractères Visual Basic.

& est l'opérateur de concaténation de chaînes de caractères.

' est l'un des deux délimiteurs de chaînes de caractères SQL (le troisième argument des fonctions de regroupement domaine est une expression SQL).
L'autre délimiteur est le guillemet double ("), comme dans Visual Basic, mais c'est moins lisible si on doit l'intégrer dans une chaîne de caractères Visual Basic.

A+