AbuuAhmed

ممكن تعطينا قيمة المتغير paath ؟

بدل السطر الأخير بهذا: xXlsFile = CurrentProject.Path & Mid(paath, InStrRev(paath, "\", -1))

احتمال يوجد رمز غير مرئي فجرب تمسح العبارة وسطر قبله وسطر بعده ثم أعد كتابة العبارة من جديد.

جرب كذا DoCmd.RunSQL "UPDATE [VMain_T] SET [ViMain_T].PrintC = 4;" أو كذا DoCmd.RunSQL "UPDATE [VMain_T] SET [ViMain_T].PrintC = '4'" هذي آخر حلولي 🙂

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

كتبت لك من حفظي ، سأفتح الأكسس وأجرب وأرجع لك ، واللي جاهز قبلي فليتفضل لا تنتظروني.

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

وجدتها بعد جهد جهيد ، هي في الـ Name Manager ، للتو تعرفت عليها وسأحاول فهما ، مع أني "قد" لا أحتاجها.

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

انهي النقاش ، ولا تعدل وتزيد في رسالتك التي تسبق ردي السابق. هذا يسمى تدليس.

وعليكم السلام ورحمة الله شاركت كمجيب والآن أشارك كسائل 🙂 الأخ @بن علية حاجي لفتني في الأكواد أسماء لم أعرف مصدرها وهي محاطة بالأقواس المربعة وكأنها أسماء حقول لجدول أو أسماء صناديق لنموذج أو تقرير ، فأين مصدر هذه الأسماء: a = [Total] Range("G" & [Lr_1] + [Lr_2] - 1) = "المجموع" Range("G" & [Lr_1] + [Lr_2]) = a

خطوة أولى ، افحص الملق وارجع لي بملاحظاتك. المجموع نتيجة البحث حسب تاريخ النهاية وتجاهل تاريخ البداية. وضعت لك الإجراء عن طريق زر البحث. OFFICENA 2024_02.xlsm

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

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

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

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

شكرا على النصيحة ، نتعلم منكم سيدي

تم التعديل علما أن رسم الدوائر سيتوقف عند تجاوز عدد "حصص زائدة" اسم الإجراء AddCircles7 حصص زائدة الاول والثانى اكتوبر2022_02.xlsm

أنا استخدم طريقة مشابهة SysDateTimeFormat_01.accdb

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

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

نبارك للمهندس قاسم الترقية ، وعساكم ع القوة

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

نبارك لكم الترقية وعساكم ع القوة.