اذهب الي المحتوي
أوفيسنا

استحراج بيانات الطلبة حسب المستوى و الفوج والمادة (معدل)


seddiki_adz
إذهب إلى أفضل إجابة Solved by دروب مبرمج,

الردود الموصى بها

  • jjafferr changed the title to استحراج بيانات الطلبة حسب المستوى و الفوج والمادة (معدل)

السلام عليكم

تفضل أخي الكريم حسب ما فهمت من طلبك

لقد غيرت اسماء الحقول من العربي الى الانكيزي وذلك لصعوبة عمل الاكواد باللغة العربية.

Option Compare Database
Option Explicit
Private Sub cboName_AfterUpdate()
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Name_Surname] = '" & Me![cboName] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    cboLevel = ""
    cboSubject = ""
    cboRegiment = ""
End Sub

Private Sub cboLevel_AfterUpdate()
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Level] = '" & Me![cboLevel] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    cboName = ""
    cboSubject = ""
    cboRegiment = ""
End Sub

Private Sub cboRegiment_AfterUpdate()
 Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Regiment] = '" & Me![cboRegiment] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    cboName = ""
    cboSubject = ""
    cboLevel = ""
End Sub

Private Sub cboSubject_AfterUpdate()
   Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Subject] = '" & Me![cboSubject] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    cboName = ""
    cboRegiment = ""
    cboLevel = ""
End Sub

وهذا الملف بعد التعديل

بالتوفيق

bdd2.accdb

رابط هذا التعليق
شارك

الرجاء من الاخوة الكرام تجربة الملف الاول او الثاني وهل تعمل التصفية حسب طلب الاخ السائل في اول مشاركة له

لان الملفات تعمل بشكل صجيج عندي بينما الاخ السائل لديه مشكلة في فتح الملف. ولم يخبرني ما هي نص الرسالة لانها  بالفرنسي.

وهنا تم تغير الطلب الى

17 دقائق مضت, seddiki_adz said:

لمطلوب

1) هو نافذة الادخال تسجيل البيانات

2) قائمة للطلبةحسب المستوى الفوج والاستاد

كما هو موضح في الملف

 

رابط هذا التعليق
شارك

14 دقائق مضت, سامي الحداد said:

الرجاء من الاخوة الكرام تجربة الملف الاول او الثاني وهل تعمل التصفية حسب طلب الاخ السائل في اول مشاركة له

من تجربة سريعة تعمل ولا تظهر رسالة خطأ

مع ذلك

لوجعلت الفلترة تتم بعد اختيار الحقول الثلاثة ولكن هي فكرة فقط

اخيرا لو ان صاحب المشاركة وضع بيانات اكثر لكان اسهل على من يرغب التعديل و يكون على بينة من نجاح التعديل

وجهة نظر

التجربة على نسخة 21

شايب🌹

رابط هذا التعليق
شارك

أخي الكريم

تفضل التعديل هل هو المطلوب ؟

الملف تم تجربته على الاوفيس 2021 وحاليا لا املك غير هذه النسخة .

2 ساعات مضت, شايب said:

من تجربة سريعة تعمل ولا تظهر رسالة خطأ

مع ذلك

لوجعلت الفلترة تتم بعد اختيار الحقول الثلاثة ولكن هي فكرة فقط

نعم  أستاذي شايب كلامك صجيج ولكن هذا ما فهمته من طلب الاخ السائل. حاليا الوقت عندي متأخر  الساعة23:30 مساءا غدا سوف اغير الكود ان شاءالله.

bdd2.accdb

  • Like 2
رابط هذا التعليق
شارك

اخي الكريم

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

ثانيا افتح ملف جديد واستورد الجدول والفورم والتقارير جرب وأعلمنا بالنتيجة.

 

رابط هذا التعليق
شارك

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

تحياتي

رابط هذا التعليق
شارك

 

13 ساعات مضت, سامي الحداد said:

أخي الكريم

تفضل التعديل هل هو المطلوب ؟

الملف تم تجربته على الاوفيس 2021 وحاليا لا املك غير هذه النسخة .

نعم  أستاذي شايب كلامك صجيج ولكن هذا ما فهمته من طلب الاخ السائل. حاليا الوقت عندي متأخر  الساعة23:30 مساءا غدا سوف اغير الكود ان شاءالله.

bdd2.accdb 580 kB · 6 downloads

فعلا البرنامج يعمل ولايوجد أى مشكلة     .........  من الممكم أن تكون فيه مشكلة فى إعدادات اللغة فى الويندوز

جرب تعيير اللغة حسب اللغة المستخدمة فى البرنامج

والله أعلم

تم تعديل بواسطه عبدالجيد
رابط هذا التعليق
شارك

13 ساعات مضت, سامي الحداد said:

أخي الكريم

تفضل التعديل هل هو المطلوب ؟

الملف تم تجربته على الاوفيس 2021 وحاليا لا املك غير هذه النسخة .

نعم  أستاذي شايب كلامك صجيج ولكن هذا ما فهمته من طلب الاخ السائل. حاليا الوقت عندي متأخر  الساعة23:30 مساءا غدا سوف اغير الكود ان شاءالله.

bdd2.accdb 580 kB · 8 downloads

يعمل بكفائة 

اذا المشكلة في اعدادات اللغة لدى صاحب الطلب

  • Like 1
رابط هذا التعليق
شارك

السلام عليكم

لكم جزيل الشكر اخواني الكرام  @شايب @عبدالجيد @د.كاف يار على تجربتكم للملف. 

الاخ @seddiki_adz ابحث بالمنتدى عن اعدادات اللغة في المنتدى وستجد الكثير من المواضيع وكيفية حل المشكلة لديك.

بالتوفيق

 

رابط هذا التعليق
شارك

كم جزيل الشكر اخواني الكرام  @شايب @عبدالجيد @د.كاف يار سامي الحدد

لقد غيرت اللغة واشتغل لديا الملف 

لكن ادا ممكن اساتذتي الكرام اريد

1) شاشة منبثقة لادخال المعطيات

2) قائمة لكل فوج حسب المستوى وحسب الفوج  وحسب الاستاد ( 3 شروط)

3) قائمة لكل استاد حسب المستوى وحسب الفوج  وحسبالمادة ( 3 شروط)

وجزاكم الله كل خير

رابط هذا التعليق
شارك

6 ساعات مضت, seddiki_adz said:

1) شاشة منبثقة لادخال المعطيات

 

تفضل

 

 

bdd2.accdb

تم تعديل بواسطه دروب مبرمج
رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information