Sql-запрос не возвращает данные

Я использую этот код для выбора кодового номера процедуры в VBA Access и проверки наличия дубликатов сохраненного продукта.

Dim db as dao.database
Dim rs as dao.recordset

Set db = currentdb

Sql_string = "SELECT code_number FROM table_product WHERE name_product ='Printer HP Color Laser Jet 550dn'"

Set rs = db.openrecordset(Sql_string)

If rs.recordcount > 1 then 
    Msgbox "Duplicate Product"
    db.close
    rs.close 'all seted to nothings
    Exit sub
Else:Text1.value =rs!code_number
End if

Этот код не позволяет идентифицировать повторяющееся название продукта.

Хотя продукт повторяется несколько раз, он всегда возвращает значение один. Я проверяю его на наличие другого имени продукта, но не обнаруживаю повторяющееся имя продукта.

Следующий код работает нормально и во многом похож на приведенный выше код:

Dim db as dao.database
Dim rs as dao.recordset

Set db = currentdb

Sql_string = "SELECT product_name FROM table_product WHERE code_number ='INK001'"

Set rs = db.openrecordset(Sql_string)

If rs.recordcount > 1 then 
    Msgbox "Duplicate Product"
    db.close
    rs.close
    Exit sub
Else:Text2.value =rs!product_name
End if

Я использую Access 2016. Кто-нибудь знает, в чем проблема? Пожалуйста, направляйте меня. Я в полном замешательстве.

Проверьте структуру таблицы и имя поля. Проверьте любой файл базы данных с этим кодом. Проверьте, что sql_string в запросе работает правильно, но vba работает неправильно. Оммм ремонтная контора. Прочтите документы Дао. Безрезультатно.