I am using a combo box to locate records using the Access created coding as below.
Private Sub Combo2_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[Division] = ' " & Me![Combo2] & " ' "
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
I am selecting a Division with the combo box and assigning departments to that division. The problem is that one of the Divisions has a ' in it's name: Women's Pavilion. I can't get it to work. I think I need to add quotes, but I can't get it to work. Thank you.