OVH Cloud OVH Cloud

Filtre sur un état

1 réponse
Avatar
olid
J'ai mis dans un formulaire un bouton pour ouvir un etat avec des filtres
préalablement saisis
exemple :
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "HOSES - RQ Pointex Détail ventes Edit"

Me.Filter = "Collection like" & "'" & Me![[COLLECTION]] & "'" & "and " &
"FOURNISSEUR like" & "'" & Me![[Fournisseur]] & "'" & "

Me.FilterOn = True

DoCmd.OpenReport stDocName, acPreview, Me.Filter, Me.Filter

==> Pas de problème
Par contre quand je rajoute une date pour sélectionner les enregistrements <=
j'ai des problèmes
exemple
Me.Filter = "Collection like" & "'" & Me![[COLLECTION]] & "'" & "and " &
"and " & "DATE" & "<=" & "'" & Me![[dated]] & "'"

==> J'ai le message suivi : impossible de trouver le champs 'Forms' auquel
il fait référence

Si je remplace <= par like pas de problème mais j'ai une égalité

1 réponse

Avatar
Raymond [mvp]
voir une réponse sur le post au dessus

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


"olid" a écrit dans le message de news:

J'ai mis dans un formulaire un bouton pour ouvir un etat avec des filtres
préalablement saisis
exemple :
Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "HOSES - RQ Pointex Détail ventes Edit"

Me.Filter = "Collection like" & "'" & Me![[COLLECTION]] & "'" & "and " &
"FOURNISSEUR like" & "'" & Me![[Fournisseur]] & "'" & "

Me.FilterOn = True

DoCmd.OpenReport stDocName, acPreview, Me.Filter, Me.Filter

==> Pas de problème
Par contre quand je rajoute une date pour sélectionner les enregistrements
< > j'ai des problèmes
exemple
Me.Filter = "Collection like" & "'" & Me![[COLLECTION]] & "'" & "and " &
"and " & "DATE" & "<=" & "'" & Me![[dated]] & "'"

==> J'ai le message suivi : impossible de trouver le champs 'Forms' auquel
il fait référence

Si je remplace <= par like pas de problème mais j'ai une égalité