Discussion :

[zut94]

Bonjour,

J'ai un formulaire avec plusieurs champs:
ligne - texte - réference - date - article - conformité...

J'aimerais que quand l'utilisateur fait un filtre pour afficher seulement les textes ayant une conformité=oui, lors de l'export du résultat sous excel avoir le filtre que j'ai appliqué sur le formulaire.

Comment je peux faire? J'utilise le filtre par défaut d'access.

[zut94]

je reformule ma question car j'ai pas de retour.

J'ai un formulaire avec les champs suivants:

Code :

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

ligne - texte - réference - date - article - conformité...

L'utilisateur peut faire un filtre sur n'importe quels champs:

Code :

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

ligne - texte - réference - date - article - conformité

Sur ce formulaire, j'ai un bouton qui me permet d'exporter les valeurs de mon formulaires.
Quand je clique sur ce bouton, si l'utilisateur n'a fait aucun filtre alors je récupère toute les donnée.
Si l'utilisateur a appliqué un filtre, je récupère les données relatives au filtre.

Mon problème est que je ne sais pas comment je peux déterminer si l'utilisateur à fait un filtre.
En gros, je voudrais faire ca:

Code :

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

1
2
3
Si filtre sur champ (nomchamp) alors
   dans ma clause where de ma requête, récupérer la valeur du filtre.
end if

[Lou Pitchoun]

Salut
As tu essayé de récupérer les valeurs des champs pour les insérer (par exemple) sur la 1ère ligne de la feuille excel ??

[zut94]

je ne sais pas comment je peut faire pour récupérer la valeur de mes champs.
Ex. pour les champ ligne, l'utilisateur peut dire je veux que les lignes 1.
Mais comment récupérer ce filtre?

[Arkham46]

http://www.developpez.net/forums/vie...asc&highlight=

[zut94]

comment je l'adapte à mes champs?

[zut94]

Dans ma requête j'ai défini dans la clause where, la valeur de mon champs conformité par exemple:

Code :

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

1
2
3
4
SELECT * FROM (Conformité 
INNER JOIN Textes ON Conformité.Id_text = Textes.Id_text) 
INNER JOIN Sites ON Conformité.Id_site = Sites.Id_site
WHERE (((Conformité.Conformité)=[forms]![list_arrete_u]![conformite]) AND ((Textes.A_Evaluer)=1) AND ((Textes.Abroge)=0))

Puis dans mon formulaire je fais un test pour savoir si mon champ conformité est filtré:

Code :

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

1
2
3
4
5
If Me.Filter = Me.conformite Then
        DoCmd.OpenQuery "ma_requete", acViewNormal
    Else
        MsgBox "ras", vbInformation
    End If

Si je filtre mon champ conformité, il exécute pas ma requête, j'arrive directement dans le msgbox.
Pq?