Incompatibilité de type [Fermé]

Signaler
-
Messages postés
16445
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
7 mai 2021
-
Bonjour,

Je cherche à affficher un Etat filtré avec 2 conditions.
Les 2 conditions fonctionnent séparement mais lorsque j'essaye de les associer je recupere le message "Incompatibilité de type"

Voici mon code:

Private Sub Commande54_Click()
On Error GoTo Err_Commande54_Click

Dim stDocName As String

stDocName = "TousLesAudits"

critere1 = "[Fournisseur]=" & "[Formulaires]![Menu]![Modifiable31]"
critere2 = "IsNull([date efficacité])"
critere3 = (critere1) And (critere2)

DoCmd.OpenReport stDocName, acViewReport, , critere3

Exit_Commande54_Click:
Exit Sub

Err_Commande54_Click:
MsgBox Err.Description
Resume Exit_Commande54_Click
End Sub


Commande54 est le bouton qui lance la procedure.
Le premier critere permet d'afficher sur l'Etat uniquement les données concernant le fournisseur selectionné dans la liste déroulante [Modifiable31] du formulaire Menu.

Le deuxieme critere permet d'afficher sur l'Etat uniquement les lignes ou le champ [date efficacité] n'est pas rempli (il s'agit d'un format date).

Comme je l'ai dis les deux criteres fonctionnent parfaitement individuellement mais la fusion des 2 ne marche pas.
Quelqu'un aurait il une solution pour resoudre mon probleme ?

D'avance Merci.


1 réponse

Messages postés
16445
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
7 mai 2021
3 170
Bonjour

essaies
critere3 = critere1 & critere2

et si tu veux un espace (ou autre caractère spécial) entre les 2

critere3 = critere1 & " " & critere2