كود بحث حتى لو فى اختلاف بسيط فى الكلمه

[mohamed322]

هل يوجد معادله بحث حتى لو فى اختلاف بسيط فى الكلمه مرفق مثال على ذالك

مثال إسلام اسلام        اداري ادارى          منه             منة 

أ ا اً  اى حرف ليه شبيه

 

شكرااااااااااااااااااااااااااااا

بحث حتى لو فى اخلاتف بسيط.xls

تم تعديل نوفمبر 6 بواسطه mohamed322

[عبدالله بشير عبدالله]

السلام عليكم ورحمة الله وبركاته  

عن طريق الكود ويمكن اضافة اي حرف احتمال يحدث فيه اختلاف 

شاهد المرفق

بحث حتى لو فى اخلاتف بسيط1.xls

وفقك الله

[mohamed322]

اكرمك الله وزادك علماً 

[mohamed322]

اسف ممكن مراجعة الجود علشان الى بيتغير بس كلمة أحمد ممكن مراجعة الكود

[عبدالله بشير عبدالله]

السلام عليكم

 جربت  الكود  أحمد -إبراهيم  -إسلام -آية- أيمن - الادارية-الإدارية - ادارة   سميرة -شئ - وغيرهاكلها يالهمز وبدون همز  شغال 100%

الكود بقوم بالتغاضى عن :

جمبع  حروف الالف لاي كلمة بالقتح او بالكسر يتم البحث عنها سواء كتبتها بالهمز او بدونه

جمبع حروف الياء لاي كلمة عند البحث لو كتبنها الف مقصورة   ى   يتم احضار قيمتها

كذلك كلمة  شئ مثلا او ما في حكمها عند البحث لو كتبنها شى  بدون همزة يتم احضار قيمتها

كذلك اي كلمة فيها ة عند البحث لوكتبتها ه يتم احضار قيمتها

وسواء كان الحروف السابقة كانت في اي موقع من الكلمة في بداية او وسط او نهاية الكلمة  يقوم باحضار قيمتها

كذلك اذا كانت الكلمة حروفها لا تتكرر مع كلمة اخرى مثلا كلمة إبراهيم  لو كتبت في البحث هيم يحضر قيمتها

كذلك الكود مرن يمكن اظافة اي حروف للكود تريد اهمالها عند البحث

    str = Replace(str, "أ", "ا")
    str = Replace(str, "إ", "ا")
    str = Replace(str, "آ", "ا")
    str = Replace(str, "ي", "ى")
    str = Replace(str, "ئ", "ي")
    str = Replace(str, "ة", "ه")
ارفق لك الملف مرة اخرى ولم اغير شيئا بالكود

اصدار الاوفيس لدي 2016 وحسب علمى الكود متوافق مع كل الاصدرات

بحث حتى لو فى اخلاتف بسيط1.xls

 

 

 

[mohamed322]

شكرااااااااا على تعبك