Combo box Error on "All"

[reality123]

I have a split form with a unbound combo box that queries based on the selection. That part queries fine, but I cannot get it to return all records if "All" is selected. I get the following error...

Run-time error 3075

Syntax error (missing operator) in query expression '[Assigned To] = All'

Row Source
SELECT Contacts.ID, Contacts.[Last Name] FROM Contacts; UNION SELECT "All","All" FROM Contacts;

AfterUpdate
Private Sub Combo81_AfterUpdate()
Me.Filter = "[Assigned To] = " & Me.Combo81
DoCmd.RunCommand acCmdApplyFilterSort
End Sub

I am fairly new to Access so please be patient. I am sure this is a easy fix for most of you.

[June7]

There is no such ID or Last Name value of 'All' in the table so the acCmdApplyFilterSort will fail. Is [Assigned To] the ID or Name value? The reference to Combo81 is probably returning the ID value.

You need to have code handle the selection of 'All', something like:

If Me.Combo81 = "All" Then
Me.Filter = "[Assigned To] Like '*'"
Else
Me.Filter = "[Assigned To] = " & Me.Combo81
End If
DoCmd.RunCommand acCmdApplyFilterSort

[reality123]

Works perfectly! Amazing how long I have spent on something so simple! 3 Hours the first time, 2 minutes the second time around. Your help is VERY APPRECIATED!