I am so frustrated!
I can not get my second combo box to populate with data. Here is what I have:
MS access 2016
Private Sub CustID2_AfterUpdate()
Me.cboCustConID2.RowSource = "SELECT Contact FROM" & _
" tblCustomerContacts WHERE CustomerID = " & Me.cboCustID2 & _
" ORDER BY Contact"
Me.cboCustConID2 = Me.cboCustConID2.ItemData(0)
'''If IsNull(Me.cboCustConID2.Value) Then
'DoCmd.OpenForm "frmEditCustomers", , , "CustomerID =" & cboCustID2.Value
'End If
End Sub
I can not get my second combo box to populate with data. Here is what I have:
MS access 2016
Private Sub CustID2_AfterUpdate()
Me.cboCustConID2.RowSource = "SELECT Contact FROM" & _
" tblCustomerContacts WHERE CustomerID = " & Me.cboCustID2 & _
" ORDER BY Contact"
Me.cboCustConID2 = Me.cboCustConID2.ItemData(0)
'''If IsNull(Me.cboCustConID2.Value) Then
'DoCmd.OpenForm "frmEditCustomers", , , "CustomerID =" & cboCustID2.Value
'End If
End Sub