Filter box Gives error when i type an apostrophy

[011billyw]

Hello guys, i tried to filter a name of a client = David O' Sullivan

However is gives me an error, i think it is because of the aphostrophy



This is the code i am using

Private Sub Combo77_AfterUpdate()Me.Filter = "(Display_Name) = '" & Me.[Combo77] & "'"
Me.FilterOn = True

Thanks in advanced

[pbaldy]

Try

Me.Filter = "(Display_Name) = " & Chr(34) & Me.[Combo77] & Chr(34)

[011billyw]

Hello Pbaldy,
SOrry for the late response but i was in school

Thank you so much!!!! it worked

[pbaldy]

Happy to help!