الاسماء عادة تتشابه خلاف للسجل المدني او الرقم القومي
الحل هو الكود السابق مع تغير طفيف ليتناسب مع الحقول النصية
اكتب الكود التالي في حدث بعد التحديث لحقل الاسم
if DCount("*","tbl1","txtname='" & txtname & "'")>0 then
msgbox"الاسم موجود"
undo
exit sub
end if
باعتبار txtname هو حقل الاسم