Applyfilter Not Working for Subform - Microsoft Access Forum


	Back to Access Forum Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Applyfilter Not Working for Subform

Innes Palm

38 days ago

Hello,
I lose the functionality for my status combo box, which acts an 'active'/'expired' status column filter on a customer contracts (continuous) form, when I insert that form as a subform onto the Customers (single) form. I believe the forms are linked correctly as the master and child fields are correct and the moving from 1 customer to another the subform updates correctly.
The VBA code I used when I created the Contracts Subform (which works when that form in standalone) is:

Private Sub StatusCombo_AfterUpdate()
    DoCmd.ApplyFilter , "[Status]='" & Me.StatusCombo & "'"
End Sub

I have copied that code into the VBA of the parent form as well when I was troubleshooting, so now it's in both parent and child form.
I've tried referring to the status combobox in the VBA in the context of the parent form to subform naming nomenclature but still no success.
Please could anyone advise if my approach is wrong, an example of that the correct VBA commands should be?
Thank you in advance.

	Raymond Spornhauer @Reply 38 days ago
I'm not sure what you're trying to accomplish here. Combo Boxes do not have Filters. You will have to update the Row Source. Also... I would watch this video for referring to fields in a subform. -Raymond

Innes Palm OP @Reply

36 days ago

Thank you Raymond for your reply and the link, that's appreciated. Regarding the active/expired status combo box - I was trying to use it to act as a filter, for a continuous form list (customer contracts) (these are both on the same form). I placed the status combo box control just above the continuous form list and everything worked fine. However, when I use that same form as a subform within customer list (single form), the status combo no longer filters the continuous form and try what I may with master and child fields, VBA, etc, I still can't get it to work. For now I have abandoned my approach and tried to achieve what I want a different way. I will watch the link and let you know if I re-attempt the same method and whether successful. Thanks again :)

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Forum.

Next Unseen

New Feature: Comment Live View