Return All Values from Combo Box

P

Pam

I have the following code for a combo box that lists assembly types for a
combo listing of each assembly's description on a subform. I need for it to
return All description values when "Complete Pump" is selected as type.
I've read the article at www.mvps.org/access/forms/frm0043.htm and am not
sure how to make it work with what I have. Any help is greatly appreciated!
Thanks,
Pam



Private Sub ComboType_AfterUpdate()
On Error Resume Next
Me!fAssemblySubform.Form!ComboDescription.RowSource = "Select
tAssemblyDescriptions.AssyDescription " & _
"FROM tAssemblyDescriptions " & _
"WHERE tAssemblyDescriptions.AssyType = '" & ComboType.Value & "'" &
_
"ORDER BY tAssemblyDescriptions.AssyDescription;"

End Sub
 
Top