I am new to this Cascading Combo Boxes stuff and my code will not work.
Am I being really Dumb.
My first Cbo Box is NAME and my second is NUMBER
The table I am pulling this from is called VAN ACCIDENTS-ISSUES
My fields are DRIVER and ACCIDENTNO.
Please help, I need this ready by 11am UK time!!
CODE
Private Sub Name_AfterUpdate()
On Error Resume Next
Number.RowSource = "Select distinct AccidentNo " & _
"FROM Van Accidents-Issues " & _
"WHERE Driver = '" & Name & "' " & _
"ORDER BY AccidentNo "
End Sub
On Error Resume Next
Number.RowSource = "Select distinct AccidentNo " & _
"FROM Van Accidents-Issues " & _
"WHERE Driver = '" & Name & "' " & _
"ORDER BY AccidentNo "
End Sub
Thanks Again!!!