محمد سلامة

بارك الله فيكم وتم المطلوب بنجاح بفضلكم شكرا لكم

السلام عليكم كل سنة وانتم طيبين.. ورمضان كريم لدي 3 حقول Text_1 وقيمته 2 Text_2. وقيمته 360 Text-3 وقيمته 90 قمت بعمل حسبة لهم في الاستعلام وهي Exper1 :Round([text_1]/[text_2]*[text_3];3) يعني 90*2/360 = 0.5 اريد ان يكون الناتج 0.500 عملت نفس الحسبة في اكسيل ثم اضغط علي زر زيادة المنازل العشرية. يقوم بعد كل ضغطة بزيادة صفر كيف يمكن حلها في استعلام

بالتوفيق الى أسرة المنتدى وتغييرت مهمة وجميلة

بعد اذن معلمى جعفر Shell "calc" هذا الامر يفتح الالة الحاسبة بغض النظر عن موقعا بالجهاز لانه يختلف من نسخ الويندوز

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

اسند القيمة لان السجل الحالي يمثل الرتبة الحالية للموظف وقبل الانتقال الي سجل جديد يجب ان تكون قيمة السجل الحالي 2 (لا) وتعني الرتبة السابقة.. والسجل الجديدة يصبح هو الرتبة الحالية والقيمة 1 (نعم)

نجحت الطريق لكن انا اريد ان اسند قيمة الى الحقل قبل الانتقال الى سجل جديد Private Sub comm_add_Click() DoCmd.GoToRecord , , acNewRec taxt_now = 2 End Sub وبهذه الطريقة لم استطيع ان اجعل قيمة الحقل taxt_now = 2 وذلك قبل الانتقال الى سجل جديد فهل من حل لاخفاء هذه الرسالة

وانا ايضا جربت سابقا ولم افلح

تمام استاذ رمهان.. شكرا جزيلا

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

من فضلكم يا جماعة محدش عنده حل تحديث

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

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

السلام عليكم ورحمة الله عند اضافة بيانات الى النموذج الفرعى تظهر هذه الرسالة فهل يمكن تفادى ظهور هذه الرسالة علما ان مصدر النموذج الفرعى استعلام ويتم فيه حسابات المرفق .. Erorr1.rar

للاسف يرفض قبولها فى الكود

عفوا استاذ جعفر النتيجة ممتازة فى الاستعلام ولكن عند استخدامها فى كود VBA تعطي نفس النتيجة فى المشاركة الالولى taxt_n1 = Round([taxt_t1] / [d2] * [d1], 3) taxt_n4 = Round(1 / [d2] * [d11], 3) اكتشفت بعد كتابة التعليق هذا انه يجب ان تكون الحقول غير منضمة يعنى اذا كانت الحقول غير منضمة تعطى نتيجة ممتازة مثل الاستعلام بالظبط فهل من حل لكي احفظ القيمة فى الجدول

بارك الله فيك استاذ جعفر تمام التمام وزي الفل

السلام عليكم ورحمة الله وبركاته يوجد لدى استعلام فيه حسابات بعض الحقول تظهر بهذا الشكل 2.566666666666667 اريد تقريبها لتكون 2.56 او 2.566 استخدمت الدالة Round ولكنها تقرب لعدد صحيح يعنى على المثال اللى (2.566666666666667) يتم تقريبه الى 3 taxt_n1: Round([taxt_t1]/[d2]*[d1]) taxt_n4: Round(1/[d2]*[d11]) فهل من حل اخر جزاكم الله خيراً

رائع جدا ابا جودي تسلم ايدك

ماشاء الله جميل جدا شكرا استاذ محمد ايمن

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

save_user_options.rar

السلام عليكم والان ظهرت المفاجاة جاري اعداد كوب قهوة والتجربة.. طبعا بعد القهوة بارك الله فيك. استاذنا جعفر

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