I actually built this code a while back, but realized this potential problem today, so that's why there's more to it.
I was able to get it working, but I just had to slightly tweak your code:strWhere = "ExceptionName Like ""*" & Replace(Me.txtName, Chr(34), String(2, Chr(34))) & "*"""
Notice the...