I am getting an error with the below code.
Error is attached.
Private Sub cmbo_Menu_Group_AfterUpdate()
Dim myMenugroup As String
myMenugroup = "Select * from tbl_BRASS_Menu_Item_Setup where [MENU_GROUP_TARGET] = & Me.cmbo_Menu_Group "
Me.subfrm_BRASS_ITEM_SETUP_subform.Form.RecordSour ce = myMenugroup
Me.subfrm_BRASS_ITEM_SETUP_subform.Form.Requery
End Sub