عبد الله قدور

السلام عليكم هذا كود اخفاء العمود في نموذج ورقة البيانات If DLookup("[show]", "subreport", "[idd]=" & Idd) = True Then Me.subform.Form.columnName.ColumnHidden = False Else Me.subform.Form.columnName.ColumnHidden = True End If ايضا كود للتحكم بحجم العمود (كل 1 سم يساوي 567 ) Me.subform.Form.columnName.columnWidth = 567 ايضا كود للتحكم بترتيب الاعمدة في النموذج ( 1 هي مكان العمود في النموذج الفرعي ورقة بيانات) Me.subform.Form.columnName.ColumnOrder = 1

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

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

السلام عليكم حياك الله اخي بلال عسى ان يكون ما قدمته في المرفق يحل طلبك الاول لكن اضطرت الى تعديل بعض الاكواد حتى يعمل على 64 بت 1731391564_.accdb

السلام عليكم ورحمة الله وبركاته اسعد الله اوقاتكم جميعا سامحوني لم استطع ان اقرا ماكتب في الموضوع كاملا ، لكني اريد ان اضع فكرة استخدمها في برنامجي المحاسبي ووجدتها في برامج محاسبية اخرى 1- في جدول بطاقة المادة تسمح للمستخدم باضافة ثلاث وحدات لكل مادة مع تحديد معامل التحويل بين كل واحدة ، كما هو متعارف عليه في معظم برامج المحاسبة ، (باستثناء برنامج الفا للمحاسبة يسمح لك باضافة عدد غير محدود من الوحدات ) 2- في جدول الفواتير تضع حقل للكمية يستخدمه المستخدم في ادخال الكمية والوحدة التي يستخدمها في عملية البيع او الشراء ويكون هناك عمود اخر للكمية مخفي يقوم البرنامج بتسجيل الكمية بالوحدة الاولى دائما فيه اعتمادا على عمود الكمية الاولى الذي ادخله المستخدم مثال عندي مادة قلم ازرق اضيفه في جدول بطاقة المادة بالوحدة الاولى قلم و الوحدة الثانية دستة ومعامل التحويل هو 12 (اي كل دستة تحوي على 12 قلم ) في الفواتير يسجل المستخدم في فاتور الشراء 2 دستة (في عمود الكمية الاول ) في عمود الكمية المخفي يقوم البرنامج تلقائيا بكتابة القيمة 24 (2*12) 3- بهذه الحالة اصبح عندك عمود يحوي حركة المادة بالوحدة الاولى دائما تقوم باستخدامه في حساب رصيد المادة ويمكن ان تحول منه للوحدات الاخرى في العرض في حركة المادة

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

جرت نقل التركيز وكانت النتيجة لا يعمل الكود في حال كان النموذج منبثق وعند الغاء تفعيل هذه الميزة يعمل الكود 😭

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

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

حياك الله اخي الكريم نحن من بعدك في هذا المكان الطيب لكني أؤكد لك ما يللي كمحاسب يعمل في هذا المجال من 15 سنة بالاضافة الى العمل على الاكسس مع المحاسبة ومن خلال الاطلاع على قواعد بيانات عدة برامج كبيرة وشهيرة في الوطن العربي : 1- القيود المحاسبية هي الاساس في كل الاعمال المحاسبية ووجودها مع وجود الفواتير ضروري جدا جدا ولا يمكن الاعتماد على جدول الفواتير بدلا من جدول القيود فأحيانا تكتب فاتورة فيها 40 صنف مباع وتسجل في القيود المحاسبية على سطرين (سجلين) فقط 2- يوجد في برامج المحاسبة عدة واجهات ادخال (فواتير البيع - الشراء - مرتجع البيع - مرتجع الشراء - الادخال - الاخراج - المناقلة - سند اليومية - سند القبض -سند الدفع ) كل واحد من هؤلاء يرجع لك قيد مختلف عن الاخر ، لذلك الحل الامثل هو وجود جدول للقيود تصب فيه العمليات من كل نماذج المذكورة 3- اضف الى ذلك احيانا يختلف في الفاتورة طريقة التسديد او وجود حسومات يؤدي ذلك الى زيادة سجلات القيد ، بالاضافة الى اختلاف انماط هذه الفواتير 4- العدد الكبير للسجلات الموجودة في الجداول المذكورة سابقا سيؤدي حتما الى بطء كبير في الاستعلامات حين يقوم بجمع كل هذه العمليات لتحويلها لقيود اثناء عرضها

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

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

للرفع

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

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

السلام عليكم اخي الكريم في المرفق تجد طريقة معتمدة في معظم برامج المحاسبة وهي الية اختيار العملة ، حيث تضع جدول للعملات فيه اسم العملة واجزاء العملة وسعر الصرف وفي النموذج تضع مربع تحرير وسرد وتربطه في الجدول ومن خلالها تختار العملة هذه الطريقة تتيح لك اضافة اكثر من عملة في اي وقت تريد example.mdb

انا ايضا لا اجد شي يستحق الترقية ولا ادري لماذا ماكرو سوفت تهمل تطوير الاكسس ، من 2016 تقريبا لا يوجد شيء جديد

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

السلام عليكم سارسل لك رابط يعطيك اسماء ازرار الكيبورد في اكسس ويمكنك استخدامها في البرمجة بدلا من SENDKEYS الرابط وهذا مثال له If KeyCode = vbKeyF3 Then End If يمكنك وضع هذا لكود في حدث عند مفتاح للاسفل

حياك الله اخب ابو ابراهيم ما شاء الله نتيجة ممتازة اعطتني

السلام عليكم ورحمة الله وبركاته اسعد الله اوقاتكم اخواني الكرام عند استخدام الدالة Round في التقريب تقوم بتقريب 5 الى الاسفل وانا اريدها الى الاعلى فهل من حل لذلك ، علما ان نفس الدالة في الاكسل تقرب 5 الى الاعلى مثال الرقم : 15.5 يتم تقريبه او جبره الى 15 المطلوب جبره الى 16

السلام عليكم ورحمة الله وبركاته بالنسبة لي انا استخدم طريقة ثانية وهي اقوم بوضع اوامر sql في جدول واضيف عمود id مع عمود sql ثم استدعي الكود باستخدام الدالة dlookup ثم استدعيها بالكود التالي DoCmd.RunSQL DLookup("[sql]", "sql", "[id]=1")

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

السلام عليكم ورحمة الله وبركاته اسعد الله اوقاتكم عندنا الدالة التالية تقوم باستخراج اسم اليوم ويظهر باللغة العربية كيف يمكنني اظهر اسم اليوم باللغة الانكليزية وكذلك اسم الشهر format(date(),"dddd")

السلام عليكم في النموذج bill المطلوب عند الضغط على زر نسخ الصورة يتم نسخ الصورة data.accdb