haniameen

الأخوة في هذا المنتدى كل عام وانتم بخير قمت بتصميم برنامج بسيط لحساب مكافأة المعلمين والإدارين هناك نسختين نسخة على 2010 وهي شغالة تمام مافيس مشاكل ونسخة على 2003 بتعطي رسالة خطأ عند فتح أي زر ويجب الدخول على كود الزر وغلقه دون التعديل عليه حتى ينشط ويعمل مش عارف ايه الخطأ المهم شغالة تمام على 2010 ارجو من الزملاء الاطلاع والتعليق على اي ملحوظات ليتم التعديل مكافأة امتحانات 2018 على اوفيس 2003.rar مكافأة امتحانات 2018 على اكسس 2010.rar

أخي sandanet شكرا على اهتمامك مشكلة الخطوط هذه تواجهني في أكسس 2010 وهي غير موجودة في قاعدة mdb سأحاول أن أجعل أكثر الخطوط استخداما في وحدة نمطية كما تفضل الأخ الوزير ... والباقي ساتبع الطريقة الأول وذلك بعد التعديل على الوحدة كما قال أخينا الوزير

شكرا اخي الوزير ... ولنفرض خمس خطوط فهمت حكاية عند التنسيق من مثال الأخ sandanet لا تنسى أخى الوحدة النمطيةالثانية منتظر التعديل على وحدة الخطوط وأن شاء الله وحدة ترقيم الصفحات

أولا شكرا أستاذي الوزير على اهتمامك لكن هذه الطريقة لم تفي بالمطلوب للأسباب الآتية : 1 - هل المفروض أني أنشء لكل نوع خط وحدة نمطية حيث أنك قمت بتثبيت نوع الخط في الوحدة .... ( توضيح أكثر )طيب لو أخذ مربع نص نوع الخط Arial وأردت أن يأخذ مربع نص آخر نوع خط آخر سأضطر هنا لتغيير نوع الخط في الوحدة النمطية إذن فما مصير نوع الخط لمربع النص الأول الذي أخذ نوع الخط Arial هل سيظل كما هو أم سيأخذ نوع الخط الجديد 2 - حضرتك أوضحت .... بوضع تعبير استدعاء الوحدة النمطية في حدث عند التنسيق أو الطباعة .... تخيل أنا عندي أكثر من مربع نص في راس الصفحة مثلا وأردت أن أضع لكل مربع نص نوع خط معين فما العمل ..... مع الاعتبار أن حدث عند التنسيق أو الطباعة لا يدعم مربعات النصوص والتسمية ثانيا : المثال في نفس الملف المرفق لنفس التقرير سترى الكود في حدث عند التنسيق لتذييل الصفحة + ثلاث مربعات نصوص ( اثنان غير مرئيان في رأس الصفحة وواحد في تزييل الصفحة ) مرتبط بهم الكود حتى يعمل

كيف يمكن الاستدعاء هل بوضع call setfntnam(txtname) في القيمة الافتراضية ام اين وماذا بالنسبة للكود الثاني الخاص بترقيم الصفحات

أخواني في هذا المنتدى لدي عدد 2 كود vba الكود الأول Me![text1].FontName = "PT Bold Dusky" وهذا الكود استخدمه كثيرا لتغيير نوع الخط في تقرير أو في نموذج في حدث عند التنسيق بالنسبة للتقرير وفي حدث الحالي بالنسبة للنموذج هل يمكن انشاء وحدة نمطية تستدعي هذا الكود في اي تقرير أو أي نموذج بدلا من كتابته عشرات المرات في التقرير الواحد أو في النموذج الواحد مع الأخذ في الاعتبار تغيير نوع الخط في كل مرة إن تطلب الأمر الكود الثاني : اعتقد نفس الفكرة وهو خاص بالتقرير في حدث عند التنسيق لتذييل الصفحة لبدأ ترقيم جديد لكل مجموعة في تذييل الصفحة في التقرير الواحد Option Compare Database Option Explicit Dim GrpArrayPage(), GrpArrayPages() Dim GrpNameCurrent As Variant, GrpNamePrevious As Variant Dim GrpPage As Integer, GrpPages As Integer '************ Code End ************* Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) Dim i As Integer If Me.Pages = 0 Then ReDim Preserve GrpArrayPage(Me.Page + 1) ReDim Preserve GrpArrayPages(Me.Page + 1) GrpNameCurrent = Me.[c_safe] If GrpNameCurrent = GrpNamePrevious Then GrpArrayPage(Me.Page) = GrpArrayPage(Me.Page - 1) + 1 GrpPages = GrpArrayPage(Me.Page) For i = Me.Page - ((GrpPages) - 1) To Me.Page GrpArrayPages(i) = GrpPages Next i Else GrpPage = 1 GrpArrayPage(Me.Page) = GrpPage GrpArrayPages(Me.Page) = GrpPage End If Else Me.ctlGrpPages = " ÕÝÍÉ" & GrpArrayPage(Me.Page) & " ãä " & GrpArrayPages(Me.Page) End If GrpNamePrevious = GrpNameCurrent End Sub المطلوب إنشاء وحدة نمطية تستدعي هذا الكود للترقيم في كل تقرير يتم إنشاؤه بدلا من كتابة هذا الكود كل مرة في حدث عند التنسيق لتذييل الصفحة أرجو أن تكون قد وضحت الفكرة وحدتين نمطيتين.rar

شكرا اخي حازم هذا هو المطلوب جزاكم الله خيرا

اخواني في هذا المنتدى لديا جدولين جدول student وجدول subjects يوجد حقل sit_no في الجدولين المطلوب عند كتابة رقم ( قيمة ) في حقل sit_no في جدول student تنتقل هذه القيمة مباشرة إلى حقل sit_no في جدول subjects قيمة حقل تساوي قيمة حقل أخر في جدول مختلف.rar

شكرا أخي شفان هذا هو المطلوب ربنا يبارك فيك ..... دائما القاك على العهد

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

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

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

أخواني في هذا المنتدى العريق السلام عليكم ورحمة الله وبركاته الموضوع جديد بالنسبة لي وأرجو أن أستطيع أن أوصله لكم لدي استعلام به حقل اسمه مجموع .......... الدرجة العظمى له 280 والصغرى 140 تم عمل تجميع لهذا الاستعلام لمعرفة عدد الطلاب الحاصلين على كل درجة وترتيبه تنازليا من 280 إلى 140 كما هو مرفق المطلوب انشاء عمود ثالث يحسب 1 - عدد الطالب الحاصلين على 280 درجة وهم 44 كما هو موضح بالصورة ثم 2 - عدد الحاصلين على 279.5 درجة فأكثر وهو يساوي ( 44 +9) = 53 ثم 3 -عدد الطلاب الحاصلين على 279 درجة فأكثر وهم ( 53 + 35 ) = 88 وهكذا بالنسبة لباقي الدرجات أرجو ان تكون وضحت الفكرة tkrary.rar

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

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

شكرا اخي ابو خليل انت واخي شيفان جاري التنزيل والرد بإذن الله سيكون ليلا

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

الصراحة أول مرة اسمع بهذا الاسم الجميل ..... تسلم أخي

أخواني في المنتدى استغرقت من الوقت اكثر من خمسة أيام جاهدا أن أربط هذه الحقوق في قاعدة كنترول للمرحلة الابتدائية للطلاب ولكن تأتي النتائج مخيبة للآمال كل مرة لدي جدول 1 - جدول الصفوف "safe "وبه حقلين كود الصف والصف وهما ثلاث صفوف في القاعدة ( الثاني والثالث والرابع ) 2 - جدول المواد "mawad" وبه عشر مواد ( الصف الثاني والثالث مقرر عليه ثمان مواد من كود المادة رقم 1 حتى كود المادة رقم 8 ) والصف الرابع مقرر عليه عشر مواد من كود المادة رقم 1 وحتى كود المادة رقم 10 ) 3 - جدول الطالب "Students" وبه بيانات للطالب وبه حقل " sit_no " وهو حقل رقم الجلوس وهو مفتاح أساسي في هذا الجدول غير قابل للتكرار 4 - جدول مادة اللغة العربية "ar "وهو يختص بتسجيل درجات اللغة العربية للطلاب 5 - جدول مادة الرياضيات "ma "وهو يختص بتسجيل درجات الرياضيات للطلاب 6 - جدول مادة اللغة الانجليزية "en "وهو يختص بتسجيل درجات اللغة الانجليزية للطلاب المطلوب ربط هذه الجدوال مع بعضها البعض 2 - تجميعها في استعلام واحد ....... ( حتى يمكن التعديل على الدرجات لكل طالب لو أردنا ذلك وعمل الاحصائيات اللازمة للنتيجة فيما بعد حسب الصف وحسب المادة وحسب الطالب ) ربط الحقول.rar

جزاك الله خيرا أخي shivan وصلت الفكرة وشكرا على مرورك واهتمامك منذ بداية الموضوع وهذا ما عهدناه فيكم رواد هذا المنتدى بس هناك طلب صغير هو انت اسمك بالعربي ايه ؟

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

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

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

أخي أبو خليل شكرا على مرورك لكن لا أدري ماذا فعلت انت في هذا المرفق ...... فلا يوجد اي تغيير فيما ارفقت ..... والوضع كما هو ولا استطيع التعديل في الدرجات من خلال مربع النص في النموذج فمثلا عند اختيار كود المادة 1 وكود الصف 3 نجد الطالب ابراهيم جادالكريم احمد جاد المولى درجة اللغة العربية 20 المطلوب أستطيع أن أغير هذه الدرجة كما أريد فمثلا بدلا من 20 نكتبها 30 أي يمكن تغيير درجة المادة من خلال النموذج حسب درجة الورقة الامتحانية للطالب حيث أنهذا النموذج هو نموذج ادخال ............. أنا توصلت لفكرة لكنها طويلة في المرفق التالي أرجو الاطلاع عليها حيث قمت بسحب جميع حقول المواد فوق بعضها واستخدام كود vba If Me.code_sub = 1 Then Me.N_Ar_1.Visible = True Me.N_Ma_1.Visible = False ولكن هذه الفكرة يعيبها طول كود vba في حدث الحالي للنموذج ولكن أنا أثق تما ما أنه توجد فكرة لديك بطريقة أفضل من هذه نهائي ادخال الدرجات .rar

لدي نموذج لاد خال درجات المواد الدراسية يوجد مربع نص tt1 المطلوب أن تتغير قيمة هذا المربع بناء على شرط معلمة كود المادة فمثلا عندما يكون كود المادة = 1 تتغير قيمة هذا المربع النص إلى قيمة الحقل n_ar_1 ويجب التعديل عليه بتغيير الدرجة كما هو متاح في الاستعلام 2 عندما يكون كود المادة = 2 تتغير قيمة هذا المربع النص إلى قيمة الحقل n_ma_1 ويجب التعديل عليه بتغيير الدرجة كما هو متاح في الاستعلام وهكذا بالنسبة لباقي المواد ................. وهذا أنا توصلت له المشكلة هي عدم القدرة التعديل على القيمة في مربع النص فهو لا يسمح بالتعديل القدرة على التعديل في قيمة مربع نص.rar