Moosak

شكرا لكم جميعاً فردا فردا ، ... 🙂🌷🌹🌼 تقبل الله دعواتكم الطيبة الرقراقة :: ورزقني الله وإياكم وأحبابكم ما تتمنون .. 🤲🌼 سعادة غامرة تنتابني بمجرد حضوركم وتشريفكم ، وإطرائكم على جهد هو أقل مما لديكم 😊🌹 منكم تعلمنا وعلى أيديكم ترعرعنا ، وإنما هي بضاعتكم ردت إليكم 🙂

السلام عليكم ورحمة الله وبركاته 🙂 اليوم يسرني أن أقدم لكم فكرة مبتكرة لتصميم :: الصفحة الرئيسية للبرنامج مع قائمة جانبية متمددة :: بألوان جميلة وتصميم راقي وتحكم شامل بعدد عناصر القائمة والقوائم الفرعية لها 👌 وأهم شي استهلاك أقل كمية من البرمجة والأكواد في التصميم ✌ :: وبدون مقدمات نبدأ على بركة الله :: الفكرة الرئيسة للقائمة الجانبية هي : عمل نموذج فرعي مستمر يستمد بياناته من جدول بحيث أن جميع عناصر القائمة الفرعية عبارة عن سجلات هذا الجدول ، ومن خلال هذا الجدول يتم ترتيب مواقع العناصر من خلال الحقل الرقم Order وكذلك يتم تصنيفها إن كانت زر رئيسي أم فرعي من خلال حقل Main or Sub والأيقونات يتم تخزينها في حقل مرفقات ، وأما الأوامر التي ستنفذها الأزرار فهي مخزنة أيضا في الجدول وهي محصورة في الأوامر التالية ( فتح نموذج - فتح نموذج فرعي - فتح تقرير - فتح تقرير فرعي - إظاهر رسالة نصية) .. والخطوة التي تأتي بعد ذالك هي تصميم النموذج الذي سيضم هذه الأزرار ، ويراعي الترتيب + فرز الأزرار الرئيسية والفرعية في الظهور + التنسيق الشرطي الذي يلون الأزرار بالألوان المناسبة لكل حالة + كود لتنفيذ الأوامر الموكلة للأزرار + .... وهكذا ثم بعد ذلك تصميم نموذج شامل للتحكم بالأزرار .. :: وللاستفادة من هذا الملف :: ستحتاج لهذه العناصر فقط ، ( والباقي كله زيادات لغرض الشرح ) : :: وهنا يأتي شرح يوتيوبي كافي وافي مفصل عن التصميم :: وفيه أيضا فوائد إضافية مثل ( طريقة اختيار أيقونات متناسقة ، وإشارة للنماذج المتطورة الأخرى ) :: تحديثات جديدة :: قمت بتطوير النموذج ليحمل أزرار فرعية وأزرار فرعية من الفرعية بناءا على طلب بعض الإخوة 🙂 كما تم إضافة خاصية إمكانية فتح الماكرو للأزرار .. وكذلك مع إمكانية فتح النماذج والتقارير في وضع التكبير Maximize .. وهذه لوحة التحكم : :: وأخيراا ملف التحميل 🙂 :: ‏‏‏‏Modern Main Page With Main Menue And Sub Sub Btns - Moosak -Maximize-Macro.accdb ملاحظة مهمة : قد لا يعمل هذا النموذج بشكل جيد على النسخ القديمة من 2007 وما قبلها . :: ولا تنسونا من صالح دعواتكم الطيبة 🙂 🌹🌷 ::

ما وجدت فرصة لتعديل ملفك ولكن هذا الموضوع بالتأكيد بيفيدك إن شاء الله 🙂 :

شكرا لك على هذا العطاء بروف @M.Abd Allah 🙂 🌹🌷🌼

ولا يهمك ياعم .. 🙂 أول ما يجهز الموضوع إن شاء الله 🌷🌹🌼

آمين يارب .. ربنا يستجيب دعواتكم ويحقق أمنياتنا وأمنياتكم 😊🤲🏻🌷🌹 :: والآن مع التشويقة الثانية 😎✌ :: :: تحكم كامل بعدد الأزرار والأزرار الفرعية والتسميات والأوامر مع إضافة أيقونات للأزرار بواجهة سهلة الاستخدام وبدون الحاجة للدخول لوضع التصميم ::

عمي العزيز الغالي @الحلبي 😊🌹 لعلك لم تلاحظ أني وضعت لك قلب كبير كقلبك الجميل 😅👈🏻 مكانك في القلب عمي العزيز ومنك المعذرة لعدم ذكرك بالاسم في الردود 🤗 ومما يزيدني سعادة إعجابك ببضاعتي المزجاة ، وهذا من حسن ضنك 🙂 وأبشر إن شاء الله بالجديد ، حاليا أضع اللمسات الأخيرة عليه 😉 ربنا يوفقنا وإياك للخيرات، ويجمعنا بك وبجميع أعضاء أوفيسنا في أعالي الجنات ☺️🤲🏻

طبعا صور ال PNG نعمة .. وممكن تعمل بها أشكال جميلة جدا .. 🙂 ولكن تراعي دائما عدم الإكثار منها لأنها تزيد حجم القاعدة بالكيلو 😁 + وكذلك تصغير حجم ملف الصورة بأكبر قدر ممكن من خلال الفوتوشوب أو أي برنامج تصميم آخر 👍🙂

مش هتصبر لحد ما تذوقنا .. أنا عارفك 😅😅🖐 طبعا عارف ذكي يعني أيييه 😊 وخصوصا لما يكون جاي من ناحيتك 😉👌 مستنينك ياعم .. شكلها دي فترة تفجر للإبداعات

حتدفع كام ؟؟ !!

:: قريبا إن شاء الله 😊👌 :: واجهة متطورة بألوان جذابة :: وقائمة رئيسية يمكن تحريرها بسهولة و لها أزرار فرعية :: بأبسط ما يكون

الآن يا @hanan_ms بدأت تتدفق الأفكار الجميلة منك 😎 شكرا على هذه الفنيات الجميلة 👍🙂🌷

كلك إبداع يابو هندسة @ابو جودي ما شاء الله 🙂👌 لمساتك على المشاريع زي الكرزة الي بتتحط فوق التورتة وزي ما بيقولوا : ( حطيت النقاط على الحروف ) 😄🌷 وتحفة تخش على المكتبة من أوسع الأبواب 🖐 ولازلنا ننتظر مشروع مستر @Foksh المرتقب

راااااااائع ما شاء الله عليك مستر @Foksh 😊👌🏻 تطور وإبداع وتميز 🙂 باقي عندك نقطة التعديل .. عند الضغط على زر التعديل تتجمد الحقول ولا يمكن التنقل بينها ( يتسمر على الحقل الأول بس ) لا يروح السابق ولا التالي 😅🖐🏻

السلام عليكم أخي عبدالله 🙂 جرب هذا الكود حصلت عليه من الذكاء الاصطناعي : Private Sub ChangeRibbonName() Dim RibbonUI Set RibbonUI = Application.CommandBars("Ribbon").Controls("MyRibbonTab") RibbonUI.Caption = "New Ribbon Tab Name" End Sub المصدر : https://poe.com/s/J0iF2yZJzcWS5qH5umBo

معلم .. ومنك نتعلم 😇 بس لسه فيه رسائل خطأ بتظهر عند إنشاء الجدول .. وما يكملش .. وهذه تظهر في حال التعليم على الخيار

يعمل بكفاءة ما شاء الله تبارك الرحمن 😎👌 غفر الله لك ولوالديك ورحمهما كما رباياك صغيرا .. 🤲

ال Caption من ضمن خصائص الحقول في الجدول 😎✌

وعليك السلام ورحمة الله وبركاته باش مهندس @Foksh 🙂 تحفة جديدة تضاف للمكتبة العربية العامرة .. ما شاء الله تبارك الله 😊🌷 ملاحظتين فقط 😅✌ : 1- ياليت لو تضيف أيضا من ضمن البيانات ( التسمية التوضيحية ) ، هذي أنا عندي من الأساسيات 😁👌 2- لو تخليه يعمل المفتاح الأساسي لحقل الترقيم التلقائي ويتعرف عليه تلقائيا .. وإذا ما وجد حقل ترقيم تلقائي ينشيء واحد جديد ويسميه ID . نفس طريقة الأكسس .. 🙂 والله يعطيك العافية على هذي الإبداعات

وعليكم السلام ورحمة الله وبركاته .. أنظر هنا لعلك تجد ما يعجبك 🙂 :

أخي @hanan_ms أنت ماهر في تصميم النماذج ولديك خبرة في استخدام عناصر Active x 🙂 أيش رايك تعمل سلسلة دروس في كيفية استخدام هذي العناصر والتحكم فيها.. ( ولكن في مواضيع مستقلة بك وبشكل منظم .. بدل ما توزع المعلومات في مواضيع المنتدى بشكل متفرق ) .. كل مرة تشرح أداة من هذي الأدوات .. من بداية إدراجها .. واستخداماتها .. وكيفية تضبيطها .. والتحكم في خياراتها .. أيش رايك ؟؟ 🙂

جميل ما شاء الله 👍🏻🙂 واصل إبداعاتك 😉👌

وهذي مشاركتي وفكرتي الصغيورة مع الإخوة 🙂🌷 قائمة منسدلة واحدة لجميع الحقول .. وجمعت الكود كله في موديول واحد .. طريقة التطبيق سهلة جدا .. 1- نسخ القائمة المنسدلة في النموذج المطلوب مع الأوامر اللي في حدث بعد التحديث ،، 2- تحديد جميع الحقول المستهدفة وكتابة الدالة الموضحة في حدث عند النقر المزدوج .. الدالة الخاصة بجميع الحقول : الدالة الخاصة بالقائمة المنسدلة المتخبية على الزاوية : 😁 الأكواد اللي في الموديول : المرفق : Drop List For Many Fields (Moosak).accdb

اللهم آمين .. وإياكم أخي العزيز 🙂🌹

أرفق ملفك أخي @pingo22 🙂