qathi

السلام عليكم اساتذتي واخواني الأفاضل أعضاء المنتدى المطلوب كما هو واضح من العنوان كود VBA يقوم بتغيير قيمة ( رقم ) حقل PrintC الموجود في جدول VMain_T قمت بعمل كود الاستعلام التحديث التالي ولم ينفع DoCmd.SetWarnings False DoCmd.RunSQL "UPDATE VMain_T SET ViMain_T.PrintC = 4;" DoCmd.SetWarnings True

السلام عليكم اخي الأفضل .. حتى يقوم بالرد عليك اساتذتنا الكرام يجب عليك توضيح طلبك بشكل صحيح ومفصل ... لأن كلامك غير واضح كيف تقول تقصد لا يتم حفظ الفاتورة إلا والتاريخ مكتوب .. أو ماذا؟؟؟ وضح اكثر

أستاذي @AbuuAhmed أستاذي الغالي أبو أحمد .. ماذا عساي أن أقول إلا أسأل الله أن يدخل عليك البهجة والسعادة الدائمة في الدنياء والأخرة .. واسأل الله أن يدخلك ووالديك وذريتك الجنة الفردوس الاعلى .. وأن يجازيك عني وعن الأسلام خيرا .. نفعنا بعلمك .. بارك الله فيك وحتى لا أنس وهذا الدعاء بالمثل لكل من ساهم بقدر أستطاته اخي @TQTHAMI استاذي @مبرمج متقاعد أستاذي @ابو جودي ولمن نسيته ويستحق الدعاء والشكر والتقدير شكرا لكم على مجهودكم الرائع .. وشكرا على اقتطاعكم من وقتكم الثمين لنا .. فجزاكم الله عنا خيرا

مبارك عليك استاذ @سامي الحداد

أعتذر عن تاخر ردي لاني كنت منشغل جدا أستاذي @AbuuAhmed قمت بتجربت ملفك وطبعاً اعجبتني طريقتك جدا ومايميز ملفك سرعة استجابة الاكواد ما أريده الان أن أستخدم الطريقتين وهي 1- طريقتك 2- وجدول يخزن كود RGB مختارة بعناية أي المفضلة يضهرها النموذج Color_F بحيث يختار المستخدم مايشاء أعتذر اني اوضح هذه النقطة لكن لا بد منها وهي: مشكلة ملف أستاذي الغالي ابو جودي أن الاكواد في الملف الذي اضافها .. عندما نقلتها لبرنامجي سببت بطء في استجابه النموذج في الانتقال للسجلات .. ليس هذا تنقيصا في حقه .. لا والله بل ان الأفكار الذي اضافها ابداعية واعجبتني وأريد أستاذي @AbuuAhmed أن تضيف في الملف زر اخر بجوار الزر الذي يحتوي طريقته وبنفس الاكواد الذي عملتها في الملف التي تعرض اللون في حدث في الحالي هذا الزر يعرض النموذج Color_F ويخزن منه كود اللون في حقل ColorN في نموذج Ma_F ويعرض اللون مباشرة بنفس الاكواد في ملفك ملاحظة مهمة جدا وهي حذف القوسين الذي يتم تخزينها بداية ونهاية كود اللون RGB في حقل ColorN في الجدول Itmes_T .. وذلك لأن نوافذ خرى فيها اكواد تتعامل مع كود اللون بدون اقواس ارجو أن الفكرة وصلت

للرفع ..

وهو كذلك أستاذي الغالي أولا قمت بتحميل ملفك واعتمدت في ملفك على الزر الأول بملفك واكتفيت به لأنه يفي بالغرض .. قمت بنسخ المديولين mod_IsWindows_64bit و modShellEx إلى برنامجي مع حذف دالتين OpenTabTip و strTerminateThis من مديول modShellEx ووضع تحت زر استدعاء الدالة RunOSK واكتفيت بهذا ملاحظة على الزر الثاني في ملفك سبب مشكلة عندي وهو تحجيم نافذة الملفات بحيث يصبح الكيبورد نصف الشاشة بالاسفل والبرنامج نصف الشاشة العلوية وهذا يعتبر مشكلة عندي .. فاستغنيت عنه

للرفع ..

تم ايجاد الحل في الملف المرفق في الصفحة الذي اشرت ألياها .. شكرا لك استاذنا الغالي و الكبير @jjafferr

أستاذي ابو احمد .. للأسف نفس المشكلة تتكرر .. فعند إضافة أي تعديل .. تتكرر المشكلة

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

أستاذي الغالي @ابو جودي ملاحظة .. ارجو حل مشكله بسيطة .. عند وضع كود ( الانتقال إلى سجل جديد ) في حدث عند الفتح النموذج Ma_F فانه لا يتم الانتقال لا إلى التالي أو سابق وتظهر رسالة خطاء عند الانتقال إلى التالي .. ارجو حل هذه المشكلة بارك الله فيك DoCmd.GoToRecord , , acNewRec

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

انشغلت .. وعندما عدت الآن فتحت المنتدى .. فوجدت العجاب والابداع .. وفاتني نقاش مثير لله دركم اساتذتي الكبار .. لكم ترفع القبعه اجلالاً واحتراما وتقديرا .. على كل هذا الابداع والتألق .. فلكم مني ومن الاعضاء كل الشكر والتقدير فجزاكم الله عنا خير الجزاء جاري تجربة الملفات

شكرا لك أستاذي الكبير جعفر .. على ردك .. ماأحلى تواجدكم معنا .. ساقوم بتجربة الاكواد التي في الصفحة الذي اشرت إليها ووافيكم بالنتائج أن شاء الله وياريت وجود كود عن تجربه

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

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

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

السلام عليكم اساتذتي واخواني الافاضل اعضاء منتدانا الغالي حياكم الله .. طِبتَ وطابَ ممشاكَ ، وتبوَّأْتَم مِن الجنَّةِ منزلًا .. اسأل في فضل من الله وصحه وعافية المطلوب كالتالي: اولاً: نموذج الالوان Color_F عند فتح النموذج - يتم تلوين كل حقل حسب كود اللون RGB ثانياً: النموذج الرئيسي للاصناف Ma_F عند الضغط على زر اختيار اللون يظهر نموذج Color_F يتم اختيار احد الالوان المعروضة ونسخها للحقل اللون ColorN في النموذج Ma_F ويتغير مباشرة لون خلفية حقل اللون ColorN حسب كوده RGB الذي تم اختيارة له وعند ضغط زر التالي او السابق يتغير لون حقل اللون حسب كود RGB وان كان لا يوجد كود لا تظهر اي مشكلة شاكرا لكم سعة صدوركم .. وعلى كل ماتقدموه لنا من وقتكم وجهدكم الثمين .. فبارك الله فيكم جميعا الملف للتعديل علية تطبيق لون.accdb

للرفع ...

السلام عليكم اخواني الافاضل .. قمت بتجربت هذا الكود في ويندوز 11 ولم يعمل فهل يوجد لدى احدكم كود لفتح الكيبورد الموجود في الويندز يعمل على جميع اصدارات الويندوز بما فيها 11 و 10 ؟؟

اخي لماذا مكتبات VBA مدفوعة ؟؟؟

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

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

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