OVH Cloud OVH Cloud

Formulaire filtré?

1 réponse
Avatar
Rodrigue
Salut,

J'utilise un form(2) appelé soit par un menu, soit par un autre form(1) via
la commande 'Openform' dans laquelle est précisée une condition 'Where'.

Dans ce 2e cas, le recordset du form(2) ne contient qu'un seul
enregistrement (voir condition 'Where') et dès lors certains contrôles
(notamment une liste déroulante de recherche) ne doivent pas être visibles.

J'ai essayé via les évènements 'Filtre' et 'Filtre Appliqué', mais sans
succès...

A moins que je m'y prenne comme un manche (ce qui est très possible), je
suppose qu'il faut utiliser l'événement 'Sur ouverture', mais alors ....

COMMENT lui faire comprendre qu'il est filtré ??
j'ai bien essayé <if Me.Recordset.Count =1> mais ça marche pas...

Si qq'un a une idée ...

Merci d'avance
ROD

1 réponse

Avatar
3stone
Salut,

Rodrigue
J'utilise un form(2) appelé soit par un menu, soit par un autre form(1) via
la commande 'Openform' dans laquelle est précisée une condition 'Where'.

Dans ce 2e cas, le recordset du form(2) ne contient qu'un seul
enregistrement (voir condition 'Where') et dès lors certains contrôles
(notamment une liste déroulante de recherche) ne doivent pas être visibles.

[...]

COMMENT lui faire comprendre qu'il est filtré ??
j'ai bien essayé <if Me.Recordset.Count =1> mais ça marche pas...




Tu peux faire quelque chose comme ceci:
(dans l'événement "Sur activation" (Form_Current) du formulaire)

Dim boSeul As Boolean
boSeul = (Me.Recordsetclone.recordcount <> 1)

Me.MaListe.Visible = boSeul
Me.MonControle.Visible = boSeul
Me.AutreControle.Visible = boSeul


Ok ?


--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------