Discussion :

[chipster62]

Bonjour

J'ai 2 zones de texte :

La première me trouve une valeur dans une table :

=RechDom("[Cadencement]";"[T105]";"[T105]![Date_Jour]=Date()")

La deuxième me trouve le nombre d'enregistrements dans une requete en fonction de cette 1ère zone :

=CpteDom("*";"[R001]";"[R001]![Date] <=[Formulaires]![F000]![date_cadencement] AND [R001]![cadencement] =False")

J'aimerais supprimer la 1ère zone de texte pour l'intégrer directement à la deuxième :

=CpteDom("*";"[R001]";"[R001]![Date] <=RechDom("[Cadencement]";"[T105]";"[T105]![Date_Jour]=Date()") AND [R001]![cadencement] =False")

Cela ne fonctionne pas. J'ai un message :
"La syntaxe de l'expression entrée n'est pas valide. Vous avez peut-être entré un opérande sans opérateur"

Merci de votre aide

[hyperion13]

Salut
Vos critères ne sont pas correctement encadrés.
Une idée ici

[chipster62]

Je n'ai pas le terme "DLookup" dans le générateur d'expression

[micniv]

Quelques connaissances utiles :
dlookup(...) n'est autre que la traduction anglaise de Rechdom(...)
dcount(...) " " " " " " CpteDom(...)
...
Les termes anglais sont utilisés dans le code VBA

[chipster62]

Bonsoir

Malheureusement je n'y arrive pas a rechercher un nombre d'enregistrement dans une Requete (R001) avec un critere de la date du jour qui recherche une valeur dans une table (T105)

il me met toujours le même message.

Et si je note cela :

=CpteDom("*";"[R001]";"[R001]![Date] <= " & RechDom("[Cadencement]";"[T105-Calendriers]";"[T105]![Date_Jour]=Date()") & " AND [R001]![cadencement] = False")

La valeur donne 0 (alors qu'elle devrait bien afficher un chiffre)

merci de votre aide

[micniv]

=CpteDom("*";"[R001]";"[R001]![Date] <= " & RechDom("[Cadencement]";"[T105-Calendriers]";"[Date_Jour]=Date()") & " AND [R001]![cadencement] = False")

2 erreurs et 2 remarques
1 - Tu compares [R001]![Date] avec un cadencement (au lieu d'une date de cadencement)

2 - Qd il s'agit de comparer des dates, je les formate toujours selon le résultat désiré.
ainsi je ferai par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
=CpteDom("*";"[R001]";"format([Date];'aaaammjj') <= '" & format(RechDom("[la_date_Cadencement]";"[T105-Calendriers]";"format([Date_Jour]; 'aaaammjj') ='" & format(Date(); "aaaammjj")  & "'") 
& " AND [cadencement] = False")

rappel si nécessaire: La fonction Format retourne une chaine
attention aux ' et aux " (je n'ai pas testé ...)