Je souhaite appliquer un filtre dans un sous-formulaire depuis mon
formulaire principal.
je suppose que je dois mettre quelque chose comme
Me![sous-formulaire]![champ] quelque part...
Mais je cafouille !!
Private Sub FiltrePoste_AfterUpdate()
Dim vFiltre As String
vFiltre = "Poste = " & """" & FiltrePoste & """"
FiltrePoste = ""
DoCmd.ApplyFilter , vFiltre
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonjour,
Essaies: Me.[NomObjetSousForm].Form.Filter = vFiltre Me.[NomObjetSousForm].Form.FilterOn = True à mettre après vFiltre=... et supprimes le DoCmd.ApplyFilter , vFiltre
(Il faudra prévoir d'enlever le filtre)
Allez, j'abuse... re-bonjour à tous !
Je souhaite appliquer un filtre dans un sous-formulaire depuis mon formulaire principal. je suppose que je dois mettre quelque chose comme Me![sous-formulaire]![champ] quelque part... Mais je cafouille !!
Private Sub FiltrePoste_AfterUpdate() Dim vFiltre As String vFiltre = "Poste = " & """" & FiltrePoste & """" FiltrePoste = "" DoCmd.ApplyFilter , vFiltre End Sub
Si quelqu'un peut me secourir, merci...
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Bonjour,
Essaies:
Me.[NomObjetSousForm].Form.Filter = vFiltre
Me.[NomObjetSousForm].Form.FilterOn = True
à mettre après vFiltre=...
et supprimes le DoCmd.ApplyFilter , vFiltre
(Il faudra prévoir d'enlever le filtre)
Allez, j'abuse...
re-bonjour à tous !
Je souhaite appliquer un filtre dans un sous-formulaire depuis mon
formulaire principal.
je suppose que je dois mettre quelque chose comme
Me![sous-formulaire]![champ] quelque part...
Mais je cafouille !!
Private Sub FiltrePoste_AfterUpdate()
Dim vFiltre As String
vFiltre = "Poste = " & """" & FiltrePoste & """"
FiltrePoste = ""
DoCmd.ApplyFilter , vFiltre
End Sub
Si quelqu'un peut me secourir, merci...
--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Essaies: Me.[NomObjetSousForm].Form.Filter = vFiltre Me.[NomObjetSousForm].Form.FilterOn = True à mettre après vFiltre=... et supprimes le DoCmd.ApplyFilter , vFiltre
(Il faudra prévoir d'enlever le filtre)
Allez, j'abuse... re-bonjour à tous !
Je souhaite appliquer un filtre dans un sous-formulaire depuis mon formulaire principal. je suppose que je dois mettre quelque chose comme Me![sous-formulaire]![champ] quelque part... Mais je cafouille !!
Private Sub FiltrePoste_AfterUpdate() Dim vFiltre As String vFiltre = "Poste = " & """" & FiltrePoste & """" FiltrePoste = "" DoCmd.ApplyFilter , vFiltre End Sub
Si quelqu'un peut me secourir, merci...
-- A+ Eric http://www.mpfa.info/ Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
