Driving a MS Access query in a subform form from the main form

vba combobox ms-access-2010 subforms
KillerSnail picture KillerSnail · Oct 10, 2012 · Viewed 7.4k times · Source

I have a subform in datasheet form.

I want this subform to be filtered based on a combo box on the mainform. The data for the subform comes from a query. I have set the criteria of one of the fields of this query to be equal to:

    [Forms]![Form_Data_Update]![cbo_ReportSelection]

The mainform is Form_Data_Update and the combo box is cbo_ReportSelection.

to make the subform refresh when I change the combo box I have put in 

    Private Sub cbo_ReportSelection_AfterUpdate()
    DoCmd.OpenQuery ("Aggregate_Leanboard_Discipline_Grouping")
    End Sub

Is there an alternate way that does not result in the query opening up in a new tab? I want it to just refresh in the subform. I tried:

    Me!Form_Leanboard_Discipline_Grouping_Subform.Requery

but that doesn't work i get an error '2465' Microsoft can't find the field 'Form_Leanboard_Discipline_Grouping_Subform'.

I am using Access 2010.

Thanks

Answer

HansUp picture HansUp · Oct 10, 2012

The subform is contained in a subform control. Use the name of the subform control, not the name of the form. They may have different names.

Private Sub cbo_ReportSelection_AfterUpdate()
    Me!SubformControlName.Form.Requery
End Sub

Related questions

Search as you type with MS Access Combobox

I would like to create a simple search-as-you-type combobox in Microsoft Access as shown in the image below. NB: the above image is from a complicated implementation of what I am trying to achieve from here My combobox is named …

Read More
How to populate a ComboBox with a Recordset using VBA

There is some literature available at expert's exchange and at teck republic about using the combobox.recordset property to populate a combobox in an Access form. These controls are usually populated with a "SELECT *" string in the 'rowsource' properties of …

Read More
Getting Combobox.Value in Access VBA

I have this code: If Me.Combobox.Value = "My Text" Then As I want to test if "My Text" is the only value selected, however, the conditional is skipped. I have also tried Me.Combobox.Column(1) and Me.Combobox.Text …

Read More