نجوم المشاركات

ولماذا لا نجمع بين مزايا كل حل كما بالمرفق هنا؟ ولكن لاأدري إذا ما كان ماكرو البيانات يندرج ضمن المحضورات المذكورة في التحدي Challange_01_03.accdb

شكرا تم الحل ج مساعدة.xlsm

نكهتي الفوكشية

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

وعليكم السلام ورحمة الله وبركاته هناك امر لم استوعبه في ملفك هل المعادلة في N1 تتعامل مع الحلية C2 فقط ام مع كل العمود C2:C اذا كانت مع كل العمود فيفضل كتابتها في N2 ثم تسحب الى اسقل حتى تتعامل كل حلية في C مع ما يقابلها في N اما اذا كانت المعاملة محدودة C2 مع N1 فقط جرب الملف المرفق ج مساعدة.xlsm

السلام عليكم وجدت لكم صيدا سمينا لمن يواجه صعوبة في استخدام شجرة الحسابات اسميتها الحرة .. لأنها لا تستخدم اداة ActiveX TreeView تعتبر مشكلة أداة ActiveX TreeView في الإصدارات الحديثة من Microsoft Access (خاصة مع ظهور النسخ 64-بت) من أكثر التحديات شيوعاً، لأن الأداة القديمة (MSCOMCTL.OCX) غير مستقرة، تسبب مشاكل في "المكتبات" (DLLs)، ولا تدعم بنية 64-بت بشكل أصيل. هذا هو الخيار "الاحترافي" حالياً. بدلاً من أداة خارجية، يتم استخدام وحدات نمطية (Class Modules) برمجها مطورون لتغيير شكل النماذج العادية لتشبه الشجرة تماماً باستخدام عناصر التحكم الأصلية (مثل الـ Labels والـ Textboxes) تعتبر أداة Jan Karel Pieterse (المعروفة بـ JKP TreeView) واحدة من أرقى الحلول البرمجية التي تعتمد على "الفئات" (Class Modules) لتعويض أداة ActiveX، لأنها لا تعتمد على ملفات خارجية، بل تُبنى بالكامل داخل كود VBA إليكم المثال العملي تم فيه إنشاء شجرة حسابات احترافية بدون الاعتماد على ActiveX ولمن أراد التوسع والاستفادة يوجد امثلة ومرفقات متنوعة مجانية خاصة بأكسس اصدارات قديمة وأكسل وورد .. في هذا الرابط Treeview 26-5.rar

السلام عليكم وتماشيا مع روح الشروط (وليس تماشيا مع الشروط 🙂 ) ، وهي ثغرة قانونية استندت عليها في المرفق 🙂 هممم ، اعتقد هذه العبارة ذو اكثر من تأويل ، فإذا استعملناها بحذافيرها ، فيمكن ان نعمل المطلوب ولكن الكود سيكون غير واضح بسبب إستعمال عدد كبير من iif في بعضها البعض !! ولذلك من مرفقات الشباب اعلاه ، ارى انهم لم يلتزموا بالعمل على مستوى إعدادات الجدول فقط ، وانما انتقلوا الى إعدادات الحقول ايضا 🙂 Challange_01_02.zip

بسيطة بدون خصائص الحقول ولو من الجدول فقط يكون Table Validation Rule كالتالى : (DateDiff("yyyy",[DOB],Date())>=18 Or [DOB] Is Null) And ([HireDate]>=#1/1/2020# And [HireDate]<=Date() Or [HireDate] Is Null) And ([JobGrade] In ("A","B","C") Or [JobGrade] Is Null) And ([JobGrade]="A" And [Salary]<=10000 Or [JobGrade]="B" And [Salary]<=7000 Or [JobGrade]="C" And [Salary]<=5000 Or [Salary] Is Null) يكون Table Validation Text كالتالى : خطأ في الحفظ: - العمر <18 سنة - HireDate قبل 1/1/2020 أو مستقبلي - Salary > حد الدرجة (A:10000 B:7000 C:5000)