Discussion :

[sebing]

bonsoir,

Je cherche la possibilité de filtrer un sous formulaire lorsque l'on sélectionne une ligne du formulaire (clic).

Mon formulaire comporte deux formulaires:
1 les fonctions et l'autre les domaines qui dépendent des fonctions.

J'aimerai que lorsque je clique sur le nom d'une fonction, les domaines qui le composent s'affiche dans le sous formulaire.

Le champ qui peut les filtrer est le num_fonction.

Merci par avance

Seb

[sebing]

Le fichier joint a été supprimer donc je vais essayer d'etre le plus precis possible afin que l'on me vienne en aide.

J'ai un formulaire contenant 2 formulaires continus .

Le premiers (fonction) a les champs suivants:

num_fonction, nom_fonction

Le deuxieme(domaine) a les champs suivants:

num_fonction, nom_domaine,

Je voudrai que lorsque l'on clique sur un nom de fonction dans le formulaire "fonction" , seuls les domaines appartenants a cette fonction s'affiche dans le formulaire "domaine"

Ce filtre peut se faire grace au num_fonction
J'ai essaye ce code

Code :

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

1
2
3
Private Sub Nom_fonction_Click()
DoCmd.ApplyFilter , "[domaine]![num_fonction] = '" & Me.Num_fonction & "'"
End Sub

mais ça me ramene une erreur

erreur d'execution 2491

Merci

Seb

[fbtsra]

Bonjour,

Voici le code :

Code :

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

1
2
3
4
5
 
Private Sub Nom_fonction_Click()
Forms![NomFormulairePrincipal]![domaine].Form.Filter = "num_fonction='" & Forms![NomFormulairePrincipal]![fonction].Form.num_fonction & "'"
Forms![NomFormulairePrincipal]![domaine].Form.FilterOn = True
End Sub

Bcdt

[sebing]

Bonjour,

Voici le code :

Code :

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

1
2
3
4
5
 
Private Sub Nom_fonction_Click()
Forms![NomFormulairePrincipal]![domaine].Form.Filter = "num_fonction='" & Forms![NomFormulairePrincipal]![fonction].Form.num_fonction & "'"
Forms![NomFormulairePrincipal]![domaine].Form.FilterOn = True
End Sub

Bcdt

Merci fbtsra pour l'aide mais il y a un message d'erreur:

erreur d execution 2465 Microsoft Access ne trouve pas le Champ "fonction" auquel il est fait référence dans votre expression

J'ai mis le code dans l'objet classe du formulaire fonction:

Code :

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

1
2
3
4
Private Sub Nom_fonction_Click()
Forms![Accueil]![domaine].Form.Filter = "Num_fonction='" & Forms![Accueil]![fonction].Form.Num_fonction & "'"
Forms![Accueil]![domaine].Form.FilterOn = True
End Sub[

Merci encore

seb

[fbtsra]

Vous avez bien un formulaire Accueil contenant deux formulaires Fonction et Domaine comme sous-formulaires ? ou fonction et domaine sont ils eux aussi liés (l'un étant le sous-formulaire de l'autre) ?

Bcdt

[sebing]

Vous avez bien un formulaire Accueil contenant deux formulaires Fonction et Domaine comme sous-formulaires ? ou fonction et domaine sont ils eux aussi liés (l'un étant le sous-formulaire de l'autre) ?

Bcdt

J'ai créé un formulaire "Accueil" et j'ai glissé les deux formulaires "fonction" et "domaine".
ils ne sont pas reliés.