AbuuAhmed

للحصول على الدينار استخدم دالة fix كالتالي: D = Fix(Amount) وللحصول على الفلوس (جمع فلس" استخدم إحدى المعادلتين: بالاستفادة من المعادلة أعلاه F = (Amount - D) * 1000 أو بشكل مباشر F = (Amount - Fix(Amount)) * 1000

لو ترفع لنا مثال وسيتم التعديل عليه.

جرب إضافة سطر ثاني لأمر sendkeys بعد أمر الذهاب إلى آخر صفحة كالتالي: SendKeys "{NUMLOCK 2}", True ويمكنك كذلك "اللعب" في رقم 2 بالزيادة أو النقصان فربما تحل المشكلة .. يعني جرب 1 ، 2 أو 3

بعد التعديل فاتورة بيع_03.accdb

هذه بسيطة الليلة إن شاء الله أضيفها.

بعد جهد جهيد حلت المشكلة ولكن .. هناك أخطاء تحتاج إلى تصحيح، ولكن دورى معك لغاية هنا انتهى. موفق أخي. فاتورة بيع_02.accdb

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

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

وما عساي أن أفعل معك؟ .. تأكد من مسميات الصناديق ومصدرها وتنسيقها كذلك الصندوقين المطلوب لصقهما في نموذج التفاصيل وليس الأب/الرئيس. عند خروج رسالة الخطأ ، التقط صورة للشاشة وبها الرسالة ، كذلك بعد انهاء الرسالة وأنت واقف على السطر المظلل مرر الفأرة على المتغيرات لتعرف المشكلة في أي متغير. موفق أخي.

لم أنتبه أن لديك حقل الأيام في الفرعي .. أضفته لك "+1" ستعرف سببه عند مشاهدتك لسجل التفاصيل رقم 3 ، إذا أردته صفرا فعدل في استعلام مصدر النموذج بالتبديل في المعادلة من +1 إلى +0 الفرق بين تاريخين بالأيام_02.accdb

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

مثال آخر .. جربه مع الإعتذار للزملاء لأني لم أطلع على أمثلتهم ورفعت مثالي بناءً على مشاركة السائل الأخيرة. الفرق بين تاريخين بالأيام_01.accdb

الله يعزك استاذنا @ابو جودي ويرفع من شأنك. شكرا لكم

أعترض 🙂 ، لم أشارك ولم أقرأ التفاصيل ولكن لا أعتقد أن vba عاجز عن الحل، وشكرا لكم.

أعتذر، رفعت لك ملفا مختلفا بالخطأ ، الآن جرب بعد رفع المثال الصحيح.

جرب وخبرنا مثال للدائن والمدين_01.accdb

الغريبة لي مشاركتين في هذا الموضوع بس السائل يبدو نظره ضعيف وأعتقد أنه ما قرأهما أو قرأهما بس ما عجبه اسمي.

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

ممكن ترفع لي نسخة 2007 وأن تحدد لي الصناديق/المربعات المطلوب التعامل معها بشكل واضح؟

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

جرب ربما هو المطلوب. نموذج مصغر_02.accdb

شكرا لكم استاذ @husamwahab وشكرا لجهودكم، ياريت الجميع يفعل كما فعلت، فعلا الفحص يحتاج دائما إلى التنويع في البيانات. خيرا فعلت. تم التصحيح. تم تبديل المرفقات أكثر من مرة، العملية متعبة وخصوصا لما تقارن مع مخرجات الاكسل، وكما قلت سابقا في موضوع آخر أن الاكسل يستخدم نوع رقمي أوسع من النوع double الموجود في الفيجوال، وهذا يسبب فقدان جزء ضيل جدا من قيمة الكسر وهذا ما يسبب الفروقات. لو نهمل المقارنة مع الاكسل الأمور تكون أسهل ولا تحتاج إلى مزيد من المعالجات والتحايل أحيانا. CeilingFunction4Access_03.xlsm 4ExcelFunctions4Access_03.xlsm

آمل تجربتهم بشكل مكثف والرجوع لنا بنتائج التجارب. خوفي أن هذه الدوال موجودة في الأكسس وأنا لا أعلم بها ويذهب تعبي سدى. تم تبديل المرفق في مشاركة لاحقة بعد تصحيح اخفاق في دالة Ceiling اكتشفه الاستاذ @husamwahab فشكرا له.

أخي، بعد فحص جديد انتبهت أن عملية القفز مطلوبة لاختيار ملاحظ عشوائيا. ولكن قمت بالتعديل على الشرط ليكون كالتالي: - ابقاء أحد الشرطين القديمين وهو منع تكرار الملاحظ لنفس الفترة. - منع دخول الملاحظ لفترتين متتاليتين. - أن لا يزيد عدد حضوره عن 3 على أساس أن حصة الملاحظ من الفترات = 26 فترة مقسومة على 10 ملاحظين لتكون النتيجة 2.6 فترة لقد قمت بتعطيل جزء في آخر الكود ، افحص النتائج أولا، وإذا وجدت أي ملاحظات وقبل أن ترجع لي فعل الجزء المعطل وافحص النتائج من جديد. موفقين ملاحظة_03.xlsm