Discussion :

[Pwouaro]

Bonjour à tous.

Voilà, j'aimerai ouvrir un formulaire à partir d'un autre en filtrant les enregistrements à partir de la valeur d'un contrôle du premier formulaire.

J'utilise donc la fonction docmd.openform:

Code :

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

1
2
 
DoCmd.OpenForm "EMPLOYE1", acNormal, , "EMPLOYE.EMP_ID = " & Me.TXT_ID

Jusque là tout va bien.
Mais je voudrais ajouter un paramètre pour le filtre. Dans l'aide access, ils précisent que Wherecondition correspond à la clause WHERE en SQL, mais sans utiliser le WHERE.

Voilà ce que j'ai tenté de faire:

Code :

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

1
2
 
DoCmd.OpenForm "EMPLOYE1", acNormal, , "EMPLOYE.EMP_ID = " & Me.TXT_ID & And POINTAGE.POINT_DATE = " & Me.TXT_DATE & ""

Lorsque j'éxécute le code, un message d'erreur me dit qu'il y a une erreur de syntaxe, en fait il ne met pas d'espace entre la valeur de "TXT_ID" et le "And".

Auriez-vous une idée svp?

[Invité]

Bonjour

Il doit te manquer un " avant le AND (un espace entre les deux).

Starec

[Pwouaro]

Merci Starec.
Apparemment, ça venait de là, car Access ne me demande plus d'entrer la date. De plus dans les options de mon formulaire j'ai bien :

Filtre : EMPLOYE.EMP_ID = 3 And POINTAGE.POINT_DATE = 19/02/2008

Voilà ce que ça donne:

Code :

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

1
2
 
DoCmd.OpenForm "EMPLOYE1", acNormal, , "EMPLOYE.EMP_ID = " & Me.TXT_ID & " And POINTAGE.POINT_DATE = " & Me.TXT_DATE & ""

J'aurais du le préciser dès le départ.... Mais la première condition correspond bien au formulaire "EMPLOYE1", par contre la deuxième correspond au sous formulaire de "EMPLOYE1".

En d'autres termes, c'est le sous-formulaire qui contient les enregistrements à filtrer. Connaissez-vous un moyen d'affecter le deuxième paramètre au sous-formulaire putôt qu'au formulaire principale?

Merci d'avance.

[Invité]

Re

Un peu de lecture pour appeler les champs d'un sous-formulaire : http://loufab.developpez.com/appelformulaire/

Starec

[Pwouaro]

Merci pour la rapidité de tes réponses starec,

D'après les info de ton lien, voilà ce que j'ai codé:

Code :

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

1
2
 
 DoCmd.OpenForm "EMPLOYE1", acNormal, , "EMPLOYE.EMP_ID = " & Me.TXT_ID & " And Forms.EMPLOYE1.POINTAGE_SF.Form.POINT_DATE = " & Me.TXT_DATE

Mais access me demande toujours d'entrer une valeur de paramètre.

J'ai également testé cette syntaxe (toujours par rapport à ce que j'ai lu dans ton lien) :

Code :

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

DoCmd.OpenForm "EMPLOYE1", acNormal, , "EMPLOYE.EMP_ID = " & Me.TXT_ID & " And POINTAGE_SF.POINT_DATE = Forms.POINTAGE.TXT_DATE"

Access me demande toujours d'entrer une valeur de paramètre. Si j'en tape une, il ouvre le formulaire mais sans appliquer le filtre.

[Invité]

Re

Il faut que tu sorte Forms... de la chaine par concaténation, comme pour le champ qui est dans ton formulaire.

Starec