Discussion :

[johweb]

Bonjour à tous,

J'ai une requête qui s'exécute en prenant en compte la valeur d'une liste déroulante d'un formulaire comme critère de sélection sur un champs de cette requête.
J'ai ajouté un VraiFaux(EstNull(...);...;...) dans ma requête si rien n'est sélectionné dans le déroulant.
Jusque là, ça roule...

Si j'exécute cette requête en ayant le formulaire fermé, une boîte de dialogue apparait à l'écran me demandant la valeur. C'est normal.
Mais j'aimerais que cette boîte de dialogue n'apparaisse pas et que dans ce cas, il y ait une valeur par défaut...
Si quelqu'un a une idée...

Merci d'avance !! ^^

[bernardmichel]

As-tu essayé la fonction Nz ?

[johweb]

Je la connaissais pas celle là... ^^

Par contre, non, cela ne fonctionne pas dans mon cas. Quand je lance la requête, il me demande à chaque fois la valeur du paramêtre...

[Arkham46]

Bjr,

Avec une fonction personnalisée :

Code vba :

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

1
2
3
4
5
6
7
8
 
Public Function CritereBidule() as String
On Error Resume Next
CritereBidule = Nz(Forms("MonFormulaire").MaListe.Value)
If Err.Number <> 0 Then
  CritereBidule = "MaValeurParDéfaut"
End If
End Function

En mettant CritereBidule en critère de la requête ça devrait le faire...

[johweb]

Tout simplement : impeccable ! ^^

Merci beaucoup.