Discussion :

[johanaquatique]

Bonjour,

J'ai un formulaire double affichage et la zone tabulaire me sert à faire des filtres dates et ensuite les envoyer en impression (c'est là où je bloque) lorsque je crée un bouton sur le formulaire via assistant, l'état d'impression m'affiche le contenu complet de la table et non le filtre que j'ai fait dans le formulaire !

Quelqu'un a une idée pour n'afficher dans l'état que le résultat de mon filtre ?
Merci d'avance

[johanaquatique]

hoooo misère que je m'impressionne

j'ai trouvé

voici le code si d'autre cherche !!!

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub Commande319_Click()
    Dim stNomDoc As String
    Dim stCritèreLiaison As String
    stNomDoc = "HardDiscounter" 'est le nom de l'état 
    stCritèreLiaison = "[N°] = Forms![frm_Liste]![N°]"
       DoCmd.OpenReport stNomDoc, , , stCritèreLiaison
Exit_Commande319_Click:
    Exit Sub
End Sub

[johanaquatique]

pfaaaa noooon hein ca marche pas gros malin que je suis pas

en fait cela n'imprime que la liste qui est selectionnée et non le contenu complet de mon filtre


pfff bon ok je cherche une solution !

[Tofalu]

Comment appliques tu les filtres dans le formulaire ?

[johanaquatique]

héhé je m'en doutais

voici 2 print creen

[Tofalu]

Si les champs s'appellent pareils dans l'état et le formulaire :

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub Commande319_Click()
    Dim stNomDoc As String
    Dim stCritèreLiaison As String
    stNomDoc = "HardDiscounter" 'est le nom de l'état 
    stCritèreLiaison = me.filter
       DoCmd.OpenReport stNomDoc, , , stCritèreLiaison
Exit_Commande319_Click:
    Exit Sub
End Sub

[johanaquatique]

et hop ! on tire le chapeau à monsieur "Tofalu"

Tout tout grand merci !!!