كل الانشطه

أسعدني مرورك أستاذي @شايب . ولهو من سوء حظي أنني لم أكن مهتماً بشغف قبل هذه السنوات الـ 10 التي مضت . ولكن لم تمت فكرة وليدة في رأس صاحبها إلا إن أهملها .. والفكرة هذه أحمد الله على نجاحها وإتمامها المطلوب كما يحب المستخدم . سؤالي ، هل الصورة المرفقة في مشاركتك من تصميم الأداة ؟؟ سؤالي يتعلق بالواجهة العربية من آكسيس وفكرة عرض شريط الريبون أثناء التصميم من اليمين لليسار . دمتم بخير

جزاك الله خيراً أستاذ @عبدالله بشير عبدالله ، فعلاً كنت قد التفت الى حل المشكلة التي أشار لها صاحب الموضوع أخي أبو مارفن ، ولم أتيقن أنه قد يكون إصدار الآكسيس 2010 .. ففعلاً على الإصدار 2010 لم تعمل معي النسخة حتى مع تعديلي لاسم النموذج في الاستدعاء . ولكنه عمل معي حين ردي السابق على الاصدار 2019 في جهاز آخر .. فعلاً في العجلة الندامة 😅

استاذ العزيز عبدالله مشكوره جهودكم الان فتح الملف احتاج ان يظهر امام كل البرامج المفتوحه وان يحتوي الفورم على زر اختصار Windows + V فهو يفتح سجل الحافظة (Clipboard History) العناصر المنسوخة مسبقا 📋. وان يعمل على برامج اخرى مفتوحه اون لاين وان اتمكن من تحريك الفورم في كل الاتجاهات ( يمين او يسار او اعلى او اسفل ) مع جزيل الشكر والتقدير لكم

السلام عليكم ورحمة الله وبركاته الملف به مشكلتان الاولى اجاب عنها معلمنا Foksh اما الثانية تكمن في الوجدة النمطية القياسية تحتاج الى تعديل مع تعديل بالكود للتوافق امر هام : ما قام به معلمنا Foksh او ما أَضَفْتُهُ للملف ليس له علاقة بطلبك الاساسي او حل لطلبك بل تصحيح للاخطاء الواردة بالملف المرفق فقط لكما تحياتي ولكل احبابنا بالمنتدى اليك الملف بعد التعديلات QQ1.xlsb

بارك الله فيك

وعليكم السلام ورحمة الله وبركاته.. جرب المعادلة التالية في الخلية B3 كمثال ، وعلى افتراض ان الخلية A3 تحتوي الرقم القومي المكون من 14 رقم :- =IF(A3="","",IF(MOD(VALUE(MID(A3,13,1)),2)=1,"ذكر","أنثى"))

اريد معادلة لتحديد النوع ذكر ، أنثى من خلال الرقم القومي

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

من المستحيل اخي الكريم.. تحقق وتأكد جيداً، فهذا محتوى الرسالة من المرفق 🕵🏻‍♂️

استاذ العزيز جربت ونفس الحاله

مع الأسف عنصر تحكم المتصفح Edge غير موجود إلا في الإصدار 365 وأعتقد والله أعلم 2024 وهذا ما ذكرته في التعليمات المرفقة والذي كان السبب في رفع نسختين من الأداة غريبة فعنصر التحكم Edge لايحتاج إلى توافق كعنصر تحكم المتصفح IE ولكن وللتأكد فقط أرجو منك تنزيل النسخة الأصلية من هذا الرابط وتجربتها فإذا عملت معك فستكون المشكلة في الأداة الخاصة بي مالم فستكون في نسخة أوفيس عندك سبب هذا الخطأ كما يتضح لي من هذه الرسالة أن عدد الخطوط عندك كبير جداً أكبر من الحد الأقصى لقائمة القيم والتي يجب أن لا تتجاوز 520 عنصر (والله مش متأكد من الرقم بالضبط ولكنه في هذا الإطار) وهذا هو السبب ولكني سأحاول معالجة المشكلة عن طريق ترحيل الخطوط إلى جدول تحياتي

بارك الله فيك على هذه الجهود أخي منتصر .. 🙂 بالنسبة لي حاولت فتح النسخة المخصصة للاصدارات الجديدة (وعندي الأوفيس 365 - 64 بت) ولكن المخططات لم تعمل وتظهر فارغة : ولكنها تظهر في حال المعاينة على المتصفحات الخارجية ! ثم جربت النسخة المخصصة للنسخ القديمة وفتحت معي بشكل جيد ولله الحمد 🙂 اللهم أن هناك خطأ واحد يظهر عند فتح نموذج تعديل المخططات .. عند السطر :

أستخدم الإصدار 2019 - 64 و 2010 - 32 وطبعاً نفس المشكلة عند الاستخدام على الاصدار 2010 - 32 بت

هل تستخدم إصدار يحتوي على عنصر تحكم المتصفح Edge ؟

بعد إذن أخي @Foksh المشكلة مرتبطة بإستخدام صندوق الحوار TaskDialog الخاص بقائمة الخيارات RadioButton فعند إستخدام هذا النوع فإنه بحاجة إلى حدثين الأول يخص حدث إظهار مربع الحوار (قد يكون النقر على زر أو النقر المزدوج على عنصر تحكم أو أي حدث آخر) وتكون القيمة الراجعة منه رقم الزر الذي سيتم نقره في مربع الحوار أما الحدث الثاني فهو حدث TaskDialog_RadioButtonClick والذي يرجع قيمة الخيار الذي تم إختياره والمشكلة أن الأخ @jo_2010 نفذ الأول ولم ينفذ الثاني ولو كان قد ركز قليلا في كود هذا النوع ضمن أداة مربع حوار المهام لوجد أنها مكونة من الحدثين المذكورين أعلاه عموما قمت بتعديل المثال المرفق بعد إضافة الحدث TaskDialog_RadioButtonClick وتم تنفيذ العمل بدون أخطاء تحياتي TEST.rar

ما شاء الله أخي منتصر ، الموضوع جميل جداً وشيق كثيراً .. ولكن فرحتي لم تبدأ 😥 . حيث كانت نتيجة تجربتي :-

أخي الكريم الخطأ واضح وصريح جداً .. فقط غير قيمة usl.Show لتصبح us.Show فقط . يعني مقصدي هو تصحيح استدعاء اسم النموذج فقط لا غير .

وعليكم السلام ورحمة الله وبركاته .. أخي جو والمتاهات في مشروعك 😅 . بعد تتبع المشكلة المشكلة لاحظت أنك كنت تستخدم المتغير strSelectedChoice مباشرة في الزر CArea ، في السطر :- Area = strSelectedChoice Call SetProperty("AreaValue", dbText, strSelectedChoice) لكن لم تكن هناك أي خطوة تسند القيمة للمتغير بعد إغلاق الرسالة . فكان المتغير يعود فارغاً للدالة . أيضاً في الدالة SetProperty ، كانت المشكلة عند الجزء dbs.CreateProperty !!! ففي أكسيس ( DAO ) لا تقبل إطلاقاً حفظ قيمة فارغة Null ، وعند إرسال قيمة فارغة كانت تعود لك بالخطأ 3385 . وهنا فقط قمنا بإضافة السطر If IsNull(varValue) Or IsEmpty(varValue) Then varValue = "" أيضاً التصريح الصريح لكائنات DAO . حيث تم إضافة تعريفات Dim dbs As DAO.Database لضمان عدم حدوث تضارب بين مكتبتي DAO و ADO داخل أكسيس . وإليه فالملف المرفق التالي بعد إجراء التعديلات :- TEST.zip

ان امكن مساعدتي لحل مشكله فتح الملف مع جزيل الشكر

الخبراء الافاضل عند الضغط على زر CAREA يظهر مربع الاختيار مااريدة بالصور TEST.rar TEST.rar

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

ما الجديد في هذا التحديث .. ضبط الحاوية بحيث تتأقلم مع طول التسمية التوضيحية لأطول زر . ضبط حجم الأزرار داخل الحاوية بحيث تكون بالحجم العادي عندما يكون اتجاه الحاوية عامودي ، والحجم الكبير للزر اذا كان اتجاه الحاوية أفقي . ضبط زر الإغلاق ليقوم بوظيفتين . * الإغلاق التام للأداة اذا كانت تعمل بشكل مستقل وليس كوظيفة Add-in داخل مشروعك لتلافي اغلاق قاعدة بياناتك كاملة . * الإغلاق المقتصر على النموذج الرئيسي للأداة اذا كانت تعمل كوظيفة Add-in . ملف الأداة للتحميل للإصدار 64 :- Ribbon Builder - 64.zip ملف الأداة للتحميل للإصدار 32 :- Ribbon Builder - 32.zip

أخي منتصر .. الحاوية وظيفتها مثل الكيس اللي يحتوي تفاح أحمر وأخضر ذو السعر الواحد .. فإن كنت تريد فصل التفاح الأصفر عنهم داخل الكيس نفسه فيلزمك كيس آخر حتماً . وهنا سنتوقف لأن الموضوع سيكون منطقياً أكثر بأن يكون التفاح الأصفر في كيس منفصل . أي أن الفاصل وظيفته تحويل الكيس العشوائي الى كيس ذو حجرات منتظمة . ولهذا تم تقييده ليكون اذا كان موضع الأزرار أفقي فقط لأن ارتفاع الشريط قد يتلف المنظر . وبالتالي جعلت لك الكيس فقط يستوعب الفاصل عندما يكون تصميمه افقي فقط 😅 . أضف إلى ذلك أن عنصر الفاصل في ملفات الـ XML للريبون مصمم هيكلياً ليعمل كـ خط فاصل عامودي يفصل بين المجموعات أو العناصر العامودية . يعني لا يوجد عنصر فاصل أفقي مخصص للريبون العامودي . أخي موسى .. ملاحظتك الأولى أعتقد أن حلها هو إما تصميم الشريط من الأساس في مشروعك باستخدام Add-in ، أو الإبقاء على استخدام الأداة منفصلة وضبط الإحداث كاملة وتصديرها الى قاعدة بياناتك ... وكلاهما واحد 😉 . وطبعاً لا تنسى أن استيراد أو فتح مشروع محفوظ مسبقاً من خارج الجداول سيتطلب منك ضبط الأيقونات فقط لأنها تتبع مسار مختلفاً عن تصميم الشريط الأساسي . والسبب هو انه يتم دمج الأيقونات داخل جداول النظام وليس داخل الجداول الخدمية للأداة . الوظيفة هنا واضحة ومفهومة ومفادها بالنتيجة عند اعتمادك للشريط الذي قمت بتصميمه هو عدم إظهار تبويبات آكسيس الأصلية .. ولكن يمكنك فتح قاعدة بيانات للتعديل على سبيل المثال باستخدام مفتاح الـ Shift 😁 . هذه النقطة قد يكون لها علاج بحيث يتم التمييز ما إذا كانت الأداة تعمل بشكل منفصل أو من خلال استدعائها من الوظائف Add-in ، ويمكن تقييد زر الخروج وجعله زر واحد يقوم بالمهمتين ( الإغلاق لقاعدة البيانات اذا كانت الأداة تعمل منفصلة ، أو الخروج من الأداة اذا كانت تعمل من خلال استدعاء الوظيفة من الـ Add-in ) . لم يصدف أن رأيت شريطاً اتجاهه من اليمين الى اليسار اذا كانت واجهة آكسيس باللغة الانجليزية 🤔 . فهدف دعم الإتجاهين هو فقط لدعم النسخ العربية ذات الواجهة العربية فقط . هذه النقطة تم حلها والحمد لله ، والسبب كان حجم الازرار الافتراضي كان = كبير عندما يكون اتجاه الحاوية العامودي . وتم علاجه بضبط حجم الزر إلى العادي . ما دام الهدف واضحاً و واحداً في الرسالتين ، فليست ذات مشكلة 😅 . كنت أطمح أن تكون باقي الإنتقادات ذات صلة أكبر في التنفيذ كأخطاء أو عقبات من شأنها أن تجعل الأداة غير ناجحة 😅 . ولكن طبعاً ملاحظاتكم وأي ملاحظات أخرى تهمني للتطوير بلا شك .. وشكراً لكم التجربة طبعاً

السلام عليكم

عدنا من جديد .. 😊🖐 بعد التجربة وجدتني أمام حاجة في قمة الروووعة وتحفة فنية ما شاء الله 😊👌 بارك الله لك هذا الجهد ، وجعله في ميزان حسناتك ، وغفر الله لك ولوالديك .. يارب 🤲 وهذي صورة للشريط اللي سويته بعد هذي المقدمة الجميلة .. عندي لك جملة من الملاحظات 😅✌ ... بعضها تجميلية وبعضها جوهرية .. الملاحظة الأولى: أولا : أنا بدأت الشغل على ملفك الرئيسي ولكن لقيت أني محتاج أربط الأزرار بالنماذج وعناصر البرنامج مثلا .. فعملت تصدير للشريط لبرنامجي وفتحت الأداة من ال Add-Ins ولكن لقيت أنه الأداة ما تستطيع تفتع المشروع الحالي للبرنامج اللي شغال عليه حاليا .. ثانيا : نسخت الملف وحاولت أفتحه .. ولكن ما أستطاع فتحه أيضا .. فصعب أني أبدأ من جديد .. كل مرة 😅 وربما الخطأ عندي 😅👊 ثالثا : لما تكون مفعل خيار [إخفاء التبويبات الأساسية] وتبغى تفتح نموذج أو تقرير أو جدول مثلا في وضع التصميم .. ما تظهر معاك أشرطة التحرير فيكون الموضوع صعب .. وحتى لو بغيت تلغي هذا الخيار وترجع لوضع التصميم لازم تعملها من الأداة الخارجية .. (مجرد ملاحظة) الملاحظة الثانية : أولا : زر الاغلاق الي في الأداة يغلق قاعدة البيانات بشكل كامل !!! فلما تكون شغال على برنامجك ( وتكون فاتح الأداة من ال Add-Ins ) لما تخلص وتغلقه يقفل لك البرنامج كامل .. وهذا شي مزعج 😥 ثانيا : خيار من اليمين لليسار لا تعمل .. كنت معينها عند التصميم .. لكن في نسخة اللغة الانجليزية يروح يسار 😄 .. هذا اللي في التصميم .. والصورة اللي فوق الناتج .. ثالثا : شوف بعض التنسيقات في وضع التصميم .. لم يتم التطبيق تلاقي الواقع مختلف .. مثال : >>>>>> رابعا : أقترح تعديل السؤال في هذي الرسالة إلى : "هل ترغب في تطبيق الشريط (الريبون) على القاعدة الحالية ؟" كذا بتكون الإجابات أكثر تناسقا .. 🙂 .. نعم .... طبق لا .... طبق في قاعدة أخرى إلغاء ....... يعني تقريبا هذا اللي جا في بالي .. وعد منك المعذرة 😅🌹