أحمد العيسى

تمت الإفادة شكراً جزيلاً لكل من شارك بمعلوماته ونصائحه

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

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

فكرة جميلة بلا شك ( خارج الصندوق) لكن التطبيق الأصلي يعتبر 3 × 1 و نماذج كل صف تتفرع من شاشة أساسية تخبرك باختيار الصف المطلوب لكن ماذا عن هذه الفكرة : أتمنى العمل عليها ، فهى أقرب لهذا التطبيق

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

هذا ما فعلته سابقاً (عمل ثلاث تقارير لها نفس المحتوى للثلاث صفوف ) ، وكنت أريد التطوير بعمل تقرير واحد .. وهذا هو السؤال الجوهري للموضوع !! الشرط موجود فى تسمية علوية بكل نموذج ومن خلال استخدام دالة ( Function ) فى مديول =GetWordFromCaption("frm_OnlyYou1"; "txt_Name"; 4) يتم استخراج كلمة الأول أو الثانى أو الثالث لكن كيف يمكن استخلاص ذلك أولاً من زر النموذج الموجود بالنماذج الثلاثة والذهاب جاهزاً إلى التقرير :

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

السلام عليكم بالقاعدة ثلاث صفوف من ثلاث جداول ، ويوجد تقرير واحد باسم "افادة قيد طالب" أريد استخدام نفس التقرير إذا تم اختيار طالب من الصف الأول أو الثانى أو الثالث مع ملاحظة أن التقرير حالياً له خاصية مصدر السجل :tbl_student1 وإذا أردت استخدامه مع الصف الثانى فلابد من تغيير مصدر السجل إلى :tbl_student2 وهذا الموضوع يستدعى نسخ نفس التقرير للصف الثانى ، ونسخ آخر للصف الثالث وبفرض أن لدينا 20 مطبوعة ، فبهذه الطريقة يجب وضع 60 تقرير ، ويعتبر هذا تكرار وإهدار كما أريد إضافة حقل غير منضم مكان النقاط المشار إليها بالسهم ليتغير محتواه حسب الصف ( الأول ، الثانى ، الثالث ) أرفقت بالأسفل المثال أعلاه ليتم التعديل فيه مباشرة تحياتى وتقديري لكم جميعاً db.mdb

تمام بعد مداخلتك لفت نظري سطر فى كود فتح النموذج الأول frm_Pass Private Sub Form_Open(Cancel As Integer) fSetAccessWindow (SW_HIDE) ' إلغاء خاصية ضغط البيانات فى خيارات برنامج أكسس قبل تشغيل التطبيق Application.SetOption "Auto compact", False Me.txtPass.SetFocus End Sub فتم تعديله مؤقتاً بوضع علامة Rem على سطر المشكلة ' إلغاء خاصية ضغط البيانات فى خيارات برنامج أكسس قبل تشغيل التطبيق ' Application.SetOption "Auto compact", False وتم الحل يبدو أننى تعجلت فى وضع مشكلة قبل البحث بجدية

السلام عليكم كما يعلم الجميع إن تأشير ميزة الضغط عند الإغلاق الموجودة فى خيارات أكسس أفضل من كتابة كود بهذا الخصوص حتى لا يتضخم الملف كلما تم تشغيله لكن عند تشغيل ملف أكسس باستخدام كود Hide Access Window تجد أن علامة ضغط عند الإغلاق قد تم إزالتها ما أقصده موضح بالصورة التالية أو أرفقت ملف حتى يتم تجربته من خلالكم قد يكون هناك كود يعمل على تلك الإزالة ولم أتوصل إليه .. وإذا كانت الإجابة بالنفى أكون فى فى انتظار حل بديل شاكر اهتمامكم مقدماً db.mdb

فيما سبق (فى 2003 ) كان هناك إمكانية نسخ صورة زر ، ثم لصقها لزر آخر "مرفق ارقام جميع الصور الموجودة في الاكسس " كما ترى عدد كبير جداً من الصور كيف يمكن تحقيق ما ذكرته " نسخ ثم لصق " ؟

أعتقد أنه إعتذار زكي أنت منشئ الأداة ومهندسها وعلى دراية بكل أبعادها

فى موضوع الأستاذ jjafferr القائمة المختصرة - Shortcut menu بمشاركة موضوعك ، كيف يمكن الاستفادة من هذا الكم الكبير جداً من تلك الصور :

فعلاً .. وقد يكون هذا سبب الإلتباس توضيح وافي جداً .. شكراً لهذا التفسير

تمام أخى موسى هذا ما كنت أفعله ( الطريقتين ) فى أوفيس 2003 مع مشقة الأولى لكن خاصية Auto Resize يبدو أنها قد تطورت فى الإصدارات اللاحقة وأصبحت مريحة