Discussion :

[Marlen]

Bonjour,

J'ai un formulaire contenant 3 sous formulaires(SForm1, SFrom2 et SForm3) qui sont tous liés au formulaire Form1.
Les sous formulaires sont affichés en mode feuille de données.

Sur l'évènement clic() du SForm1, je filtre les autres sous formulaires, voici le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Form_Click()
 
    Dim filtre As Integer
 
    filtre = Forms.Form1.SForm1.Form.txtID_CLIENT.value
 
 
    Forms.Form1.SForm2.Form.Filter = "[ID_CLIENT] = " & filtre
    Forms.Form1.SForm2.Form.FilterOn = True
    Forms.Form1.SForm3.Form.Filter = "[ID_CLIENT] = " & filtre
    Forms.Form1.SForm3.Form.FilterOn = True
 
 
End Sub

Cela fonctionne parfaitement, le problème surviens lorsque je veux retirer ces filtres :
J'ai créé un bouton SuppFiltre dans mon Formulaire sur lequel j'ai placé ce code

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub CmdSuppFiltre_Click()
 
    Me.SForm3.Form.FilterOn = False
    Me.SForm3.Form.Requery
    Me.SForm2.Form.FilterOn = False
    Me.SForm2.Form.Requery
 
 
End Sub

Le résultat : SForm3 affiche bien tous les enregistrements mais SForm2 reste filtré même si... dans le cadre en bas à gauche à côté des flèche de déplacement il n'est plus indiqué "(filtré)"
Dans ce code si j'inverse que je retire le filtre de SForm3 puis celui de SForm2 j'obtiens l'inverse : SForm2 affiche tous les enregistrement mais pas SForm3.

Si je remplace la méthode Requery par RecordSource cela fonctionne mais je ne comprend pas pourquoi un "simple" Requery ne fait pas l'affaire.
Une idée?

[loufab]

Bonjour,
Normalement le requery n'est pas nécessaire avec le Filter.

Je te suggère de vider la propriété FilterOn en plus de mettre Filter à False.

Cordialement,

[Marlen]

Je te suggère de vider la propriété FilterOn en plus de mettre Filter à False.

C'est ce que j'avais fait dans un premier temps mais comme cela ne changeait rien j'ai supprimé cette ligne.

C'est un mystère pour moi...

[Marlen]

Visiblement il n'y a pas de meilleur solution que le Recordsource...

[loufab]

Les 2 méthodes fonctionnent correctement.
Tout dépend de la construction des form et sous-form.

Perso j'ai une 3ème méthodes qui est un tantinet plus complexe.

Je crée un controle dans Form1 que je nomme id_sf1. Il recevra la valeur de l'id du sous-form1 lors du clic sur l'un de ses controles.

Ensuite j'utilise simplement les propriétés ChampsPere et ChampFils du container du sous-form2 pour faire le filtre. Comme ceci.

Code :

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

1
2
Champ Pere :Id_Sf1
Champ Fils :Id

Bon il faut dire que mon cas est un peut plus spécifique car j'ai une relation à 3 Id.

Code :

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

Idform, idSf1, idSf2

Avec 2 ça devrait le faire tout autant.

cordialement,

[bounana]

Bonjour,

en fait j'ai le même truc que vous par contre moi j'utilise 4 sous formulaire mais c'est pas grave pc que le même principe, SVP vous pourrez m'explique plus pc que j'ai pas bien compris
je cherche l'emplacement du code et les noms de chaque sous formulaire, moi j'ai fait copier coller mais ce marche pas
c'est quoi SForm1, SForm2, SForm....
vraiment j'ai besoin de vous

cordialement