اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

السلام عليكم ورحمة الله وبركاتة 

 

اتمنى مساعدتي في اضافة الحصة في الموذج وكذالك في التفرير بحيث يمكن اظافة اكثر من سلوك في أكثر من حصة في اليوم 

KEN44.accdb

قام بنشر

وعليكم السلام ورحمة الله وبركاته

الافضل ان تقوم بعمل تصفية للنموذج كالتالي

    Dim myCriteria As String
    
   If IsNull(Me.C) Then
        myCriteria = myCriteria & "("
        myCriteria = myCriteria & "[nmsaf]= '" & Me.a.Value & "'"
        myCriteria = myCriteria & ")"
        'Debug.Print myCriteria
        Me.Form.Filter = myCriteria
        Me.Form.FilterOn = True
   Else
   
        myCriteria = myCriteria & "("
        myCriteria = myCriteria & "[nmsaf]= '" & Me.a.Value & "'"
        myCriteria = myCriteria & " or "
        myCriteria = myCriteria & "[Fsl]= '" & Me.C.Value & "'"
        myCriteria = myCriteria & ")"
        'Debug.Print myCriteria
        Me.Form.Filter = myCriteria
        Me.Form.FilterOn = True
   
   End If

KEN44.accdb

تحياتي

قام بنشر (معدل)
في ١٢‏/٧‏/٢٠٢١ at 06:55, محمد أبوعبدالله said:

وعليكم السلام ورحمة الله وبركاته

الافضل ان تقوم بعمل تصفية للنموذج كالتالي

    Dim myCriteria As String
    
   If IsNull(Me.C) Then
        myCriteria = myCriteria & "("
        myCriteria = myCriteria & "[nmsaf]= '" & Me.a.Value & "'"
        myCriteria = myCriteria & ")"
        'Debug.Print myCriteria
        Me.Form.Filter = myCriteria
        Me.Form.FilterOn = True
   Else
   
        myCriteria = myCriteria & "("
        myCriteria = myCriteria & "[nmsaf]= '" & Me.a.Value & "'"
        myCriteria = myCriteria & " or "
        myCriteria = myCriteria & "[Fsl]= '" & Me.C.Value & "'"
        myCriteria = myCriteria & ")"
        'Debug.Print myCriteria
        Me.Form.Filter = myCriteria
        Me.Form.FilterOn = True
   
   End If

KEN44.accdb 604 kB · 7 downloads

تحياتي

السلام عليكم ورحمة الله وبركاتة 

كيف الحال اخي محمد ابو عبدالله 

بنسبة لتصفية  فقد قام kanory  بعمل المطلوب وهي تصفية بحسب الصف ثم بحسب الفصل وفكرة البرنامج استغني عن الكشوفات الورقية 

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

ولك شكري

KEN44.accdb

تم تعديل بواسطه amhmad
اضافة
قام بنشر

انا ما قدرت اعمل شي بعد التصفية 

حاول تكرر علي بعد  التصفية 

ورد علي بالنتيجة 

بالنموذج ما قدرت اضيف سلوك ؟ 

 

قام بنشر
في ١٣‏/٧‏/٢٠٢١ at 22:43, amhmad said:

السلام عليكم ورحمة الله وبركاتة 

كيف الحال اخي محمد ابو عبدالله 

بنسبة لتصفية  فقد قام kanory  بعمل المطلوب وهي تصفية بحسب الصف ثم بحسب الفصل وفكرة البرنامج استغني عن الكشوفات الورقية 

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

ولك شكري

KEN44.accdb 564 kB · 11 downloads

هذا تعديل على ملفك .......

ولكن الملف الثاني افضل من حيث الادخال بحيث تستطيع ادخال اكثر من سلوك للطالب الواحد في اكثر من حصة """"

 

2.png

KEN66.accdb ‏‏KEN55.accdb

  • Like 3
قام بنشر
في ١٥‏/٧‏/٢٠٢١ at 14:56, kanory said:

هذا تعديل على ملفك .......

ولكن الملف الثاني افضل من حيث الادخال بحيث تستطيع ادخال اكثر من سلوك للطالب الواحد في اكثر من حصة """"

 

رائع اخي الكريم جزاك الله خير والله ينفع بعلمك   

 

هل من الممكن تحويل التاربخ للهجري ...

قام بنشر
14 ساعات مضت, amhmad said:

رائع اخي الكريم جزاك الله خير والله ينفع بعلمك   

 

هل من الممكن تحويل التاربخ للهجري ...

من خيارات الاكسس اتبع الصورة

 

1.png

  • Thanks 1

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