كل الانشطه

تمام .. اختفى الخطأ أصبح الآن لدينا طريقة جديدة فى البحث .. يرجى التعديل فى القالب الأصلي شكراً لكما

مشاركةً مع اخي منتصر .. استبدل الاستعلام الموجود في الدالة GetLettersArray التي فيها الخطأ ، بالتالي :- strSQL = "SELECT DISTINCT Left(Trim(SearchName), 1) AS SearchLetter " & "FROM (" & strRS & ") AS SubQuery " & "WHERE SearchName IS NOT NULL;" حيث أن الدالة Left تحتاج إلى معاملين . وانت استعملت معامل واحد وهو SearchName ، ولم تحدد رقم الحرف الأول ، لتصبح :- Left(Trim(SearchName), 1)

موضوع مكرر @المشرفين لإجراءاتكم 😇

معادلة جلب العنوان: =IFERROR(INDEX($K$4:$K$1000,MATCH($B4&$C4&$D4,$H$4:$H$1000&$I$4:$I$1000&$J$4:$J$1000,0)),"") معادلة جلب المهنة: =IFERROR(INDEX($L$4:$L$1000,MATCH($B4&$C4&$D4,$H$4:$H$1000&$I$4:$I$1000&$J$4:$J$1000,0)),"") في إصدارات Excel القديمة يجب إدخال المعادلة كمصفوفة بالضغط على: Ctrl + Shift + Enter أما في Excel 365 وExcel 2021 فيكفي الضغط على Enter فقط، ولا حاجة لاستخدام Ctrl + Shift + Enter.

عندي جدولين رقم 1 اريد تعبئة بيانات العنوان و الوظيفة من الجدول رقم 2 لكن كل من الاسم و اللقب و تاريخ الميلاد في الجدول رقم 1 غير مرتبين مثل الجدول رقم 2 المطلوب : معادلة أو كود برمجي يقوم بالبحث و عندما يجد تطابق يقوم بتعبئة البيانات (العنوان و الوظيفة) من الجدول رقم 2 الى الجدول رقم 1 جزاكم الله كل خير

عندي جدولين رقم 1 اريد تعبئة بيانات العنوان و الوظيفة من الجدول رقم 2 لكن كل من الاسم و اللقب و تاريخ الميلاد في الجدول رقم 1 غير مرتبين مثل الجدول رقم 2 المطلوب : معادلة أو كود برمجي يقوم بالبحث و عندما يجد تطابق يقوم بتعبئة البيانات (العنوان و الوظيفة) من الجدول رقم 2 الى الجدول رقم 1 جزاكم الله كل خير 1.xlsx

اعرض الملف aSc Timetable السلام عليكم لقيت ان هذا الملف مطلوب بهذه المشاركة فقمت برفعه هنا .. رجاءا من السادة المشرفين نقله الى هذه المشاركة : وهذا شرح أيضا للبرنامج صاحب الملف كمال على طارق تمت الاضافه 09/17/26 الاقسام قسم الإكسيل  

تفضل db.mdb

إذا جربت حذف وإعادة إستيراد النموذج frmSearch ولم ينجح فلو أمكن ترسل مثال للتأكد

حولت تطبيقي إلى صيغة *.accdb وتم تجربته على أوفيس 365 (2024) وتم الاستيراد وبناء الكود كما أسلفت لكن ما زالت الأخطاء كما هي ، و كما أوضحتها سابقاً سأحاول التجربة غداً على نسخة أكسس أقل فى الإصدار إذ ربما تكون المشكلة فى النسخة المثبتة على جهازي

المفروض يعمل في أي نسخة المشكلة الذي لاحظتها من رسالة الخطأ جملة SQL والتي تظهر بهذا الشكل Left(Trim(SearchName) As SearchLetter FROM (SELECT Nr AS SearchNo, Name_S AS SearchName FROM tbl_student1 ORDER BY Name_S) AS SubQuery WHERE SearchName IS NOT NULL ويفترض أن تكون بهذا الشكل SELECT DISTINCT Left(Trim(SearchName),1) As SearchLetter FROM (SELECT Nr AS SearchNo, Name_S AS SearchName FROM tbl_student1 ORDER BY Name_S) AS SubQuery WHERE SearchName IS NOT NULL فلو قارنا بين الجملتين سنجد عدم وجود عبارة SELECT DISTINCT وكذلك دالة Left كانت خاظئة عموماً جرب حذف النموذج frmSearch وإعادة إستيراده من القالب وإن شاء الله تحل المشكلة

سنيت اناكتب المفتاح المفتاه هو H 123

الفكرة مبتكرة وجميلة جداً لكن واجهتني بعض الصعوبات أثناء التنفيذ وأحتاج بعض التوضيحات كما فهمت : يتم استيراد الثلاث نماذج التالية إلى تطبيقى frmSearch sfrmSearch frmFinderBuilder واستخدام الأخير frmFinderBuilder لبناء كود البحث المستخدم ثم يمكن حذفه بعد ذلك من التطبيق وتم وضع الكود الذى تم استنساخه فى الزر الموضح بالصورة بالنموذج الذى يستقى بياناته من الجدول tbl_Student1 التطبيق أعلاه بصيغة mdb (أكسس 2003) البناء والنسخ والاستخدام لا يوجد به مشاكل لكن الناتج لا يعمل حتى على أوفيس 2024 .. ما السبب ؟؟

هذه الكلمات هي أكبر جائزة فهنيئاً لكما أخي @Foksh وأخي @ابوخليل

تسلم يا غالى وفقك الله لما يحبه ويرضى أوفيس 2019 / 64يت ويندوز 10 / 64يت

بارك الله فيك أخي حافظ ، وجزاك الله عنا وعن من سيستفيد من مشروعك هذا كل خير .. ونسأل الله أن يكون في ميزان حسناتك . بعد تحميلي الملف صادفتني مشكلة عند تسجيل الدخول :-

السلام عليكم و رحمة الله و بركاته بالسنبة للسيد فوكش كن متاكدا اني لم و لن انساك و خاصة انت اكثر شخص من رافقني في كل مشكلة و كذلك السيد ابو خليل الى ان وصلت اليه في اعداد و تحسين البرنامج الذي برمجته رغم اني لم ادرس يوما البرمجة باي شكل من اشكالها و لكني محب لها و وجدت ضالتي في هذا الموقع الذي يجمع العديد من الخبراء ذوي سعة الصدر والمرافقة و لقد وضعت العديد من المشاكل التي اعترضتني و تقريبا جلها قد وقع حله و جازاكم الله خيرا لما قدمتموه و ما تقدموه و ساحذف جميع المعلومات التي تخص شركتي و اترك البرنامج جاهز للاستعمال و لمن اراد ان يزيد في تحسينه و هذا ثمرة جهدكم التي قدمتموه لي حتى اصل الى ما وصلت اليه الان رغم ان البرنامج ثقيل في حجمه لكني اريد ان اهديه و اجعله صدقة جارية لمن يطلبه ليكون في ميزان حسناتي و ميزان كل من ساهم فيه. و اليكم يا سادتي كل من اراد ان يطوره فليفعل و ساكون اول المتابعين لاتعلم و اطور افكاري و قدراتي التي بفضل الله اكتسبتها من نصائحكم و معونتكم و بالنسبة للنعداد التلقائي فانا اتبعت من قبل خطى السيد فوكش و لكن كنت اتسائل هل يمكن تلافي حذف الارقام لتكون متطابقة مع رقم الصفحة الحقيقي رغم اني لا اعتمده الا في الطابعة لانه يطلب مني رقم الصفحة التي اريد طبعها. و سالقي نظرة على ما تفضل بيه السيد منتصر الانسي من مداخلة و ادخل الرابط لاحاول ان افهم و اتعلم. gestion commerciale.rar

لربما محاولة رفعه مثلاً على جوجل درايف قد تفي بالغرض ، ليكون مرجعاً يستفاد منه عند حاجته .. 🤗

العفو أخي الكريم .. 💐

العفو أخي الكريم 🤗 وإياكم أجمعين 🤲🏻

أشكرك عزيزي نعم هذا ما ابحث عنه .

جزاك الله خير والف شكر لمجهود حضراتكم افضل اجابة

وعليكم السلام ورحمة الله وبركاته .. لدي ملف قديم أرسله لي أحد الطلاب والأصدقاء ، سأشاركك إياه كتجربة مبدأية قابلة للتطوير . عجلة سؤال وجواب.pptx

اسمحوا لي بهذه المداخلة كما ذكر الأساتذة فسبب المشكلة أنك تعتمد الترقيم التلقائي وعند حذف سجل وإدخال سجل جديد بعد الحذف سينتقل للرقم الذي يلي السجل المحذوف هناك حل لهذه النقطة ولكنه حل غير عملي تماماً فهو يحتاج إلى تحقق شرطين الأول أن تكون السجلات المحذوفة في نهاية الجدول والشرط الثاني القيام بإجراء ضغط وإصلاح لقاعدة البيانات وهذين الشرطين من الصعب إن لم يكن مستحيلاً تحقيقهما في الواقع الحل الأنسب هو أن يتم ترقيم السجلات عن طريق البرنامج وقد ذكر الأخ @Foksh إحدى تلك الطرق وهي بإستخدام دالة DMAX رغم أنها ستحل نص المشكلة فهي ستحل مشكلة حذف أخر سجل ولكن لن تحل المشكلة إذا تم حذف سجل من المنتصف هناك طرق مخصصة تحل المشكلة وإحدى تلك الطرق كنت قد قدمتها ضمن سلسلة الأدوات المساعدة المخصصة وهي أداة الترقيم التلقائي المخصص - مع مراعاة الأرقام المفقودة أرجو أن تجد فيها حل للمشكلة