MOMEN AHMED قام بنشر سبتمبر 7, 2021 مشاركة قام بنشر سبتمبر 7, 2021 اعزائي مشرفي واعضاء المنتدى الذي اضع له كل الاحترام والتقدير في شخصهم الكريم ترددت كثيرا اين اضع موضوعي في قسم الاكسل ام في قسم الاكسس ولكن وضعتها هنا لان استفساري عن الاكسس ارفق لكم معادلة في الاكسل وحاولة اكثر من مره ان احولها الى استعلام تحديث على الاكسس ولكن فشلت وذلك لان المعادلة تبحث عن كلمه في جمله كاملة المعادله بالاكسل IFERROR(LOOKUP(1;0/MATCH("*"&Sheet2!$A$2:$A$204&"*";OFFSET(C2;;;COUNTIF(F:F;F2));0);Sheet2!$B$2:$B$204);"") ووضعت في المرفقات الاكسل المطلوب تحويل المعادلة من الاكسل الى الاكسس شرح مبسط للفكره ان sheet2 به الكلمهات الدلالية داخل العناوين وامام كل كلمه اسم المحافظه التي سوف تجلبها المعادلة sheet1 به العناوين التي يراد البحث بداخلها عن الكلمات الدلاليه ارجوا المساعده جزاكم الله خيرا لان الاكسل كما تعلمون ياخذ وقت طويل جدا في التحديث اما الاكسس فيمكن اجراء هذه المعادله في بضع ثوان اذا كانت كمية العناوين هائله معادله تكويد سريعه.xls رابط هذا التعليق شارك More sharing options...
husamwahab قام بنشر سبتمبر 8, 2021 مشاركة قام بنشر سبتمبر 8, 2021 تفضل هذه المحاولة ارجو ان تكون موفقة Database1.rar 3 رابط هذا التعليق شارك More sharing options...
MOMEN AHMED قام بنشر سبتمبر 8, 2021 الكاتب مشاركة قام بنشر سبتمبر 8, 2021 مجهود ممتاز ومشكور على الرد والاهتمام بس هل ممكن شرح مبسط لفكرة المديول وفكرة الاستعلام وهل لو في اكثر من حقل في sheet2 يظهر لي نفس النتيجة لاني حابب اضيف حقل(اسم الشارع) حقل(اسم المنطقة) حقل (اسم المحافظه) والناتج كود معين رابط هذا التعليق شارك More sharing options...
MOMEN AHMED قام بنشر سبتمبر 8, 2021 الكاتب مشاركة قام بنشر سبتمبر 8, 2021 المديول يبحث عن كلمه واحده فقط في sheet2 انا جربت يكون اسم شارع مكون من اكثر من كلمه ولكن لم يكون هناك نتائج هل في جزء معين يتم التعديل عليه ليكون هناك البحث عن اكثر من كلمه في الحقل وهل من الممكن الشرط يتحقق بالبحث في اكثر من حقل؟ رابط هذا التعليق شارك More sharing options...
د.كاف يار قام بنشر سبتمبر 8, 2021 مشاركة قام بنشر سبتمبر 8, 2021 23 ساعات مضت, MOMEN AHMED said: اعزائي مشرفي واعضاء المنتدى الذي اضع له كل الاحترام والتقدير في شخصهم الكريم ترددت كثيرا اين اضع موضوعي في قسم الاكسل ام في قسم الاكسس ولكن وضعتها هنا لان استفساري عن الاكسس ارفق لكم معادلة في الاكسل وحاولة اكثر من مره ان احولها الى استعلام تحديث على الاكسس ولكن فشلت وذلك لان المعادلة تبحث عن كلمه في جمله كاملة المعادله بالاكسل IFERROR(LOOKUP(1;0/MATCH("*"&Sheet2!$A$2:$A$204&"*";OFFSET(C2;;;COUNTIF(F:F;F2));0);Sheet2!$B$2:$B$204);"") ووضعت في المرفقات الاكسل المطلوب تحويل المعادلة من الاكسل الى الاكسس شرح مبسط للفكره ان sheet2 به الكلمهات الدلالية داخل العناوين وامام كل كلمه اسم المحافظه التي سوف تجلبها المعادلة sheet1 به العناوين التي يراد البحث بداخلها عن الكلمات الدلاليه ارجوا المساعده جزاكم الله خيرا لان الاكسل كما تعلمون ياخذ وقت طويل جدا في التحديث اما الاكسس فيمكن اجراء هذه المعادله في بضع ثوان اذا كانت كمية العناوين هائله معادله تكويد سريعه.xls 515 kB · 6 downloads ياليت توصف مهمة هذا الكود عشان نتوصل لحل و تفضل هذه المحاولة تكويد.accdb 5 رابط هذا التعليق شارك More sharing options...
husamwahab قام بنشر سبتمبر 8, 2021 مشاركة قام بنشر سبتمبر 8, 2021 1 ساعه مضت, MOMEN AHMED said: بس هل ممكن شرح مبسط لفكرة المديول وفكرة الاستعلام الكود يقوم بتقسيم النص الى كلمات ويحجزها في مصفوفة ثم يقارن وحود كلمة او كلمتين متتاليتين في حقل جدول المقارنة 1 ساعه مضت, MOMEN AHMED said: وهل لو في اكثر من حقل في sheet2 يظهر لي نفس النتيجة لاني حابب اضيف حقل(اسم الشارع) حقل(اسم المنطقة) حقل (اسم المحافظه) والناتج كود معين نعم ممكن لكن الافضل مراعاة عدم تطابق بيانات الحقول فكلما كانت البيانات فريدة (غير مكررة) كلما كانت النتائج ادق 1 ساعه مضت, MOMEN AHMED said: المديول يبحث عن كلمه واحده فقط يبحث لحد كلمتين لانه لو تلاحظ النتائج وجود كفر الشيخ نعم بعض النتائج لا تظهر وذلك لوجود مشكلة في النص جرب ان تكتب كلمات مثل البحر الاحمر وغيرها ولاحظ النتيجة 1 ساعه مضت, MOMEN AHMED said: هل في جزء معين يتم التعديل عليه ليكون هناك البحث عن اكثر من كلمه نعم يتم اضافة شرط ثالث للكود لكن للامانة لم اجرب ElseIf Nz(DLookup("Column1", "Sheet2", "Column1='" & Trim(Arr(i)) & " " & Trim(Arr(i + 1)) & " " & Trim(Arr(i + 2)) & "'"), 0) <> 0 Then FnSearch = DLookup("Column2", "Sheet2", "Column1='" & Trim(Arr(i)) & " " & Trim(Arr(i + 1)) & " " & Trim(Arr(i + 2)) & "'") Exit For وعذرا للاطالة 1 رابط هذا التعليق شارك More sharing options...
MOMEN AHMED قام بنشر سبتمبر 8, 2021 الكاتب مشاركة قام بنشر سبتمبر 8, 2021 انا منبهر بحضرتك وجزاك الله خير وجعله الله في ميزان حسناتك اقتباس نعم ممكن لكن الافضل مراعاة عدم تطابق بيانات الحقول فكلما كانت البيانات فريدة (غير مكررة) كلما كانت النتائج ادق انسخ نفس المعادلة واضيف فقط اسماء الحقول المكتوب فيها الكلمات صح كده؟؟؟ رابط هذا التعليق شارك More sharing options...
MOMEN AHMED قام بنشر سبتمبر 8, 2021 الكاتب مشاركة قام بنشر سبتمبر 8, 2021 4 ساعات مضت, د.كاف يار said: و تفضل هذه المحاولة اكثر من ممتازه بارك الله فيك رابط هذا التعليق شارك More sharing options...
husamwahab قام بنشر سبتمبر 8, 2021 مشاركة قام بنشر سبتمبر 8, 2021 8 ساعات مضت, MOMEN AHMED said: انا منبهر بحضرتك وجزاك الله خير وجعله الله في ميزان حسناتك انا بخدمتك استاذي العزيز اما الانبهار فيمكن تجاوزه بمجرد النظر الى مشاركات اساتذتنا الاجلاء وما يقدموه من افكار وحلول امثال استاذ جعفر و د. كاف يار واستاذ بارنا واستاذ صالح وغيرهم الكثير الكثير وما انا سوى تلميذ صغير بمدرستهم يبحث عن اكواد هنا وهناك لمحاولة المساعدة لبعض الاعضاء الاعزاء 8 ساعات مضت, MOMEN AHMED said: انسخ نفس المعادلة واضيف فقط اسماء الحقول المكتوب فيها الكلمات صح كده؟؟؟ نعم صحيح مه مراعاة ما يجب تغييره من اسماء المتغيرات وغيره وهناك طريقة اكثر مرونة بجعل نفس المعادلة تتعامل مع اكثر من جدول وحقل 1 رابط هذا التعليق شارك More sharing options...
MOMEN AHMED قام بنشر ديسمبر 9, 2021 الكاتب مشاركة قام بنشر ديسمبر 9, 2021 في ٨/٩/٢٠٢١ at 12:10, husamwahab said: الكود يقوم بتقسيم النص الى كلمات ويحجزها في مصفوفة ثم يقارن وحود كلمة او كلمتين متتاليتين في حقل جدول المقارنة نعم ممكن لكن الافضل مراعاة عدم تطابق بيانات الحقول فكلما كانت البيانات فريدة (غير مكررة) كلما كانت النتائج ادق يبحث لحد كلمتين لانه لو تلاحظ النتائج وجود كفر الشيخ نعم بعض النتائج لا تظهر وذلك لوجود مشكلة في النص جرب ان تكتب كلمات مثل البحر الاحمر وغيرها ولاحظ النتيجة نعم يتم اضافة شرط ثالث للكود لكن للامانة لم اجرب ElseIf Nz(DLookup("Column1", "Sheet2", "Column1='" & Trim(Arr(i)) & " " & Trim(Arr(i + 1)) & " " & Trim(Arr(i + 2)) & "'"), 0) <> 0 Then FnSearch = DLookup("Column2", "Sheet2", "Column1='" & Trim(Arr(i)) & " " & Trim(Arr(i + 1)) & " " & Trim(Arr(i + 2)) & "'") Exit For وعذرا للاطالة السلام عليكم عزيزي husamwahab اعتذر عن التاخير في التجربه ولكن دواعي العمل ارادت ان يكون البحث عن ثلاث كلمات وليس كلمتين فقط تم اضافه الكود ولكن يخرج لي error ارجوا من حضرتك التجربه واخباري اين الخطأ واريد حضرتك تعلمني اذا زودنا في sheet2 اكثر من حقل Column1 و Column2 وColumn3 والنتيجه تكون من Column4 كيف يتم التعديل في المديول وجزاك الله خير الجزاء رابط هذا التعليق شارك More sharing options...
MOMEN AHMED قام بنشر مارس 26, 2022 الكاتب مشاركة قام بنشر مارس 26, 2022 ارجوا ان اجد اجابه رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان