نجوم المشاركات

احذف الاستلام والكود تحت الزر واستبدله بالتالي DoCmd.RunSQL "INSERT INTO table2 ( المعرف, yr2, mn2, emp_code2, salary2 ) " & _ " SELECT table1.المعرف, table1.yr1, table1.mn1, table1.emp_code1, table1.salary1 " & _ " FROM table1;" DoCmd.Requery

وعليكم السلام أهلا بك هذا ملفك بعد التعديل نسخ .rar

اي خدمة ... بالتوفيق

السلام عليكم ورحمة الله وبركانه أخي الكريم مثالك بعد التعديل طبعا قمنا بانشاء وحدة نمطية فيها التأثيرالمطلوب وبامكانك التعديل في الالوان حسب ماتراه مناسب لك ثم يتم استدعائه من أي نموذج تريدعن طريق حدث عند فتح النموذج ... بالتوفيق اتمنى اني وفقت في الاجابة Ka_test.accdb

السلام عليكم ورحمة الله وبركاته برنامج المخازن اتمنى ان ينال اعجابكم مرفق الشرح برنامج مخازن 2019.xlsx

الماكرو حسب علمى والله تعالى اعلى واعلم اغلبها جاهز ولا يحتاج كتابه كثيرا فيوفر الكثير من الوقت واعتقد حسب ما فهمت مما قراته قد يكون الماكرو اقضل من ناحية الثبات اما الفعل واحد ان كتب الكود جيدا ولكن هناك ما يستوجب فعله كتابة كود برمجى وان كنت اميل الى البرمجة بلغة (vba) فهي اكثر مرونة من الماكرو😉 ههههههههههه طبعا هذا راى المتواضع وما انا الا طالب علم فقد يكون لاساتذتنا الكرام اراء تختلف عنى ولكن لولا اختلاف الاراء لبارت السلع وكما يقال لكل شيخ طريقه وطريقته لذلك راى المتواضع هو ليس حكر على الافضلية المطلقة او المفاضلة المطلقة بين الماكرو والكود واسمح لى استاذ صابر بتوضيح شئ ايضا الكود الذى تفضل به استاذنا الغالى الاستاذ @kanory ما هو الا استعلام بلغة sql ويفضل المبرمجين عمله بهذة الالية بلغة sql بدلا من عمل الاستعلام ككائن حفاظا على برامجهم عند تحويلها وتشفير الاكواد كى لا يتمكن قراصنة البرامج من تحليل بنية البرنامج للوقوف على اساليب بناءه وافكارة اما بالنسبة للمستخدم العادى من وجهة نظرى المتواضعة الاستعلام افضل لسهولة التعديل عليه باى وقت ان اراد ذلك دون عناء هذا تلميح فقط ليس الا

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

اخي الكريم اعطني فرصة للوصول للمنزل لاستخدام الحاسب لاضع لك الحل ان شاء الله تعالى ... واسف على تأخري في الرد ... لاني نسيت موضوعك ...

هذي ما تبي شيخ . يعني انك كمبرمج ستعتمد الحقل الذي ترغب والذي يحقق النتيجة الصحيحة

أخي أبا فتحي . فهم المطلوب اذن : اضف مثالا للتعديل عليه

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

جرب وبلغني بالنتيجة ... بالتوفيق

وعليكم السلام ورحمة الله وبركانه أخي الكريم لو وضعت مثال توضيحي ليسهل التطبيق عليه بارك الله فيك لكن طبق هذا الكود لربما يفي بالمطلوب Public Sub EkCtrControl(frm As Form) On Error Resume Next Dim EkCtr As Control For Each EkCtr In frm If TypeOf EkCtr Is TextBox Then EkCtr.ForeColor = اكتب ماتريد EkCtr.FontSize = اكتب ماتريد EkCtr.FontName = اكتب ماتريد EkCtr.BackColor = اكتب ماتريد If TypeOf EkCtr Is CommandButton Then EkCtr.ForeColor = اكتب ماتريد EkCtr.FontSize = اكتب ماتريد EkCtr.FontName = اكتب ماتريد If TypeOf EkCtr Is Label Then EkCtr.ForeColor = اكتب ماتريد EkCtr.FontSize = اكتب ماتريد EkCtr.FontName = اكتب ماتريد EkCtr.BackColor = اكتب ماتريد If TypeOf EkCtr Is ListBox Then EkCtr.ForeColor = اكتب ماتريد EkCtr.FontSize = اكتب ماتريد EkCtr.FontName = اكتب ماتريد EkCtr.BackColor = اكتب ماتريد Next EkCtr End Sub اتمنى اني وفقت في الاجابة

إخوتي الفضلاء أقدم من مكتبتي تطبيق التقويم لتثبييت المواعيد والأحداث ، وقد إستخدمت الفكرة و أجزاء من التطبيق في كثير من التطبيقات الخاصة وهو منظومة للتقويم ولتثبيت المواعيد و الأحداث ، ويمكن إظهار التقويم كنموذج لليوم و / أو الأسبوع و / أو شهر ويحاكي التصميم المستخدم في MS OUTLOOK آملاً عموم الفائدة والله من وراء القصد وهو حسبي ............ NA_Calendar.rar

تحياتى و ايام مباركه سبحان الله و بحمده مرفق برنامج بسيط جاهز للطباعه على شيكات بنك التجارى الدولى_مصر_CIB_اصدار دفاتر 2018 مميزات البرنامج يتم التفقيط تلقائى بالجنيه المصرى كود بحث و اضافه دبل كليك عن المستفيد امكانية اضافة عدد لا نهائى من البنوك مع ضبط ابعاد الشيك كود طباعه للشيك لا تنسونا من صالح الدعاء برنامج الطباعه على Check_cib_2018.rar

طلب الي أحد الأصدقاء ان أقوم بإدراج التاريخ 29 شباط في كل السنوات الكبيسة المحددة بين عامين فكان هذا الملف (ربما يكون في ذلك إفادة للبعض) Leap years.xlsx

الماكر لا يعمل مع العلم انى قد قمت بتمكين الماكرو ... وقد قمت بارفاق صورة بتلك المشكلة

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

هل يمكن ان تتم بالماكروا . وايش الفرق بين الماكروا والكود في التنفيذ

شكرا جزيلا استاذي الفاضل @kanory

اخى الحبيب اعتذر لم اقم بالتحربة كما ينبغى وشكرا على كلماتك الطيبة الرقيقة وللعلم تكفنى كلمة اخى فهى احب واقرب الى قلبى احبكم فى الله وكل عام وأنتم الى الله اقرب اتفضل قاعدتك بعد التعديل وتلافى المشكلة جدول الحصص 3 .accdb

تفضل اخى الكريم هذا حل بمعادلات المصفوفة 12-1.xlsm

بعد اذن اخي علي و زيادة في اثراء الموضوع هذه المعادلة =IF(A1="","",VLOOKUP(A1,{1,"راسب";50,"ناجح";65," جيد";75,"جيد جدا";85," ممتاز";95,"ممتاز مع مرتبة الشرف"},2))

الاستاذ الراقى محمد بك عصام اشكرك على الرد والاهتمام ولكن للاسف هناك مشكلة وهى اذا تم اخذ المدرس يومان اشراف فى الاسبوع لم يتم تسجيل اسمة فى الجدول الا مره واحدة والسجل الاخر يظل بلا اسم ارجوا الاطلاع والافادة وكل عام وحضرتك بخير

وعليكم السلام ورحمة الله تعالي وبركاته استاذ @kanory🤗 وكل عام وانتم الى الله اقرب ان شاء الله وفى صحة وسعادة انتم واحبابكم وامة محمد صلوات ربي وسلامه عليه بل الشرف لي انا اخى الحبيب ان اتعلم منكم وعلى يديكم اما بخصوص المثال اعجبنى المرقق الخاص بكم اكثر وما اعجبنى فى المثال الاجنبي فقط مربع التحرير والسرد والذي يحتوى على عدة الوان مسبق برمجتها لاضقاء مرونه للمستخدم بتعدد الالوان وسهولة استخدامها ان شاء الله باحاول اطبق الفكرة على مثالكم الطيب ان يسر الله تعالى لى وهيئ لى من امرى رشدا جزاكم الله خيرا اخى الحبيب

اتفضل جدول الحصص.accdb

تفضل جرب هذا alma1-1(Recovered).xlsm

السلام عليكم ورحمة الله تعالى وبركاته استاذ @kanory🤗 اولا جزاكم الله خيرا وجعلكم سابقون بالخير كله ان شاء الله ثانيا استسمح حضرتك عدلت تعديل طفيف قمت باضاقة عناصر اخرى على الوحدة النمطية وكذلك التحكم فى لون الاطار للعنصر ولون الخط واهديكم ايضا مثال حصلته من قبل من احد المواقع الاجنبيه اعجبنى جدا وقتها ولكن الان اصبح العمل اسهل وابسط وبايد عربية Ka_test 2.accdb hilite_demo.zip

اشكرك استاذ خالد وتم عمل اسم مختصر بالفعل وتم المراد منه بنجاح والحمد لله ولك وللاستاذ عبدالله كاظم تحياتى

جزاك الله خيرا ،شغل ممتاز ، كل سنة وحضرتك طيب

تفضل أخى الكريم 1-111.xls

وعليكم السلام اخى الكريم لو ممكن رفع الملف مرة اخرى فهناك مشكلة فى تحميله -جزاك الله كل خير

بارك الله فيك وجزاك الله كل خير شكرا جزيلا لك على المشاركات الفعالة جعله الله فى ميزان حسناتك

جزاكم الله خير تم الحل حصلت على ملف اكسل خاص لتسميات عناصر شريط الأدوات للأكسس وكان الحل عن طريق معرف التسميات في الأكسس لعلامات التبويب والمجموعات والملف بعد النعديل مع ملف الاكسل بالمرفقات Ribbon Customizations.rar

السلام عليكم تطبيق بسيط وسهل على طريقة اخفاء حقول بالمايكرو بناءا على شرط معين مرفق قاعدة البيانات للتطبيق اتمنى لكم الفائدة اخفاء حقول.accdb

وعليكم السلام Codes Library v1.9.7.rar

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