Discussion :

[zappy bibicy]

Bonjour les gens,

j'ai un formulaire dans lequel je peux selectionner un fournisseur dans une liste, et qui appelle une requete; je voudrais que si aucun fournisseur n'est séléctionné la requete selectionne tous les fournisseurs;
quelqu'un a-t-il une solution??

Sivouplé.

[Pitou5464]

c'est quoi le code et ta requete stp

[zappy bibicy]

Pour faire court :
j'ai une table articles à partir de laquelle je veux extraire des listings d'articles de 4 façons :
- la totalité de la table
- tous ceux d'un rayon (ts les fournisseurs)
- tous ceux d'un fournisseur (ts les rayons)
- les articles d'1 fournisseur d'1 rayon

Pour ça j'ai un formulaire avec une listbox fournisseur et une listbox rayon.
ces deux listbox affichent "global" par défaut.
Ce que je voudrais c'est que qd la valeur d'1 des deux contrôles soit sur "global", le parametre de la requête comprenne tous les enregistrements du champ (Est Non Null, comme qui dirait).
Comme je n'y arrive pas à l'heure actuelle je suis obligé d'avoir 4 rqt au lieu d'1, c'est ballot.
Pr le code j'ai un bête bouton de requete, où rqt est une variable à qui j'impute le nom de la requete choisie selon les deux listbox :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Private Sub Visualisation_Click()
On Error GoTo Err_Visualisation_Click
 
    Dim stDocName As String
 
    stDocName = rqt
    DoCmd.OpenQuery stDocName, acNormal, acEdit
 
Exit_Visualisation_Click:
    Exit Sub
 
Err_Visualisation_Click:
    MsgBox Err.Description
    Resume Exit_Visualisation_Click
 
End Sub
 
pour la requête, celle avec deux critère parametrés:
SELECT [TABLE ARTICLES].[Mode OMEGA], [TABLE ARTICLES].[Code Rayon], [TABLE ARTICLES].Grossiste, [TABLE ARTICLES].Fournisseur, [TABLE ARTICLES].Appli, [TABLE ARTICLES].[Maj article], [TABLE FOURNISSEURS].[Code Omega], [TABLE ARTICLES].[Code UG], [TABLE NOMENCLATURE].Lib_UG, [TABLE ARTICLES].[Statut article], [TABLE ARTICLES].Désignation, [TABLE ARTICLES].[Marque Commerciale], [TABLE ARTICLES].[Poids vol unitaire], [TABLE ARTICLES].Colisage, [TABLE ARTICLES].DLC, [TABLE ARTICLES].TVA, [TABLE ARTICLES].EAN, [TABLE ARTICLES].CB1, [TABLE ARTICLES].[PA cession mag], [TABLE ARTICLES].SVAP, [TABLE ARTICLES].[PV base TTC], [TABLE ARTICLES].PK, [TABLE ARTICLES].[Taux marque PV base TTC]
FROM [TABLE NOMENCLATURE] RIGHT JOIN ([TABLE ARTICLES] LEFT JOIN [TABLE FOURNISSEURS] ON [TABLE ARTICLES].Fournisseur = [TABLE FOURNISSEURS].Fournisseur) ON [TABLE NOMENCLATURE].UG = [TABLE ARTICLES].[Code UG]
GROUP BY [TABLE ARTICLES].[Mode OMEGA], [TABLE ARTICLES].[Code Rayon], [TABLE ARTICLES].Grossiste, [TABLE ARTICLES].Fournisseur, [TABLE ARTICLES].Appli, [TABLE ARTICLES].[Maj article], [TABLE FOURNISSEURS].[Code Omega], [TABLE ARTICLES].[Code UG], [TABLE NOMENCLATURE].Lib_UG, [TABLE ARTICLES].[Statut article], [TABLE ARTICLES].Désignation, [TABLE ARTICLES].[Marque Commerciale], [TABLE ARTICLES].[Poids vol unitaire], [TABLE ARTICLES].Colisage, [TABLE ARTICLES].DLC, [TABLE ARTICLES].TVA, [TABLE ARTICLES].EAN, [TABLE ARTICLES].CB1, [TABLE ARTICLES].[PA cession mag], [TABLE ARTICLES].SVAP, [TABLE ARTICLES].[PV base TTC], [TABLE ARTICLES].PK, [TABLE ARTICLES].[Taux marque PV base TTC]
HAVING ((([TABLE ARTICLES].[Code Rayon])=[Formulaires]![Mercuriale]![P2]) AND (([TABLE ARTICLES].Fournisseur)=[Formulaires]![Mercuriale]![P1]))
ORDER BY [TABLE ARTICLES].[Code Rayon], [TABLE ARTICLES].Fournisseur;

voilà, suis pas bien sûr d'être très clair, là...

Balises de code mise par Faw. Merci d'y penser...
c'est simple:
On sélectionne le texte du code et on appuie sur #
Courtoisement.

[zappy bibicy]

Ah ben oui, merci ça va beaucoup mieux comme ça
Merci Faw.
Menfin ça ne résoud pas mob soucis...