معيار في التقرير

[mohamed elalfy]

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

تمنياتي لحضرتكم جميعا ان تكونوا في احسن حال

في المرفق نموذج يسجل به شهادات للتعرف على موعد انتهائها

في التقرير 

Document 1

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

manual 1 , manual 2 , manual 3 , manual 4 , manual 5 , manual 6 

لا يظهرها التقرير Document1 

ويظهر باقي البيانات فقط يخفي ولا يظهر البيانات المقابله لها 

بمعنى

عند الاشاره بصح عند annual 1 

 يخفي في التقرير 

rang1 & rang2 & based1

 

عند الاشاره بصح عند annual 2

 يخفي في التقرير 

rang3 & rang4 & based2

عند الاشاره بصح عند annual 3

 يخفي في التقرير 

rang5 & rang6 & based3

عند الاشاره بصح عند annual 4

 يخفي في التقرير 

rang7 & rang8 & based4

عند الاشاره بصح عند annual 5

 يخفي في التقرير 

rang9 & rang10 & based5

عند الاشاره بصح عند annual 6

 يخفي في التقرير 

rang11 & rang12 & till

 

اتمنى من الله ان اجل ضالتي بين خبراتكم شكرا

 

Certificates.rar

[عبد اللطيف سلوم]

نزل الجداول مع قاعدة البيانات

لكي يتم عمل استعلام ووضع المعايير عليه

والاستعلام لا يمكن عمله من نموذج

لا بد من وجود جدول

حتى لو قمت بعمله داخل التقرير فلا بد من وجود الجداول

[mohamed elalfy]

شكرا يا أ عبد اللطيف على ردك 

بس اعئرني انا لسه في البدايات 

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

 

[عبد اللطيف سلوم]

39 دقائق مضت, mohamed elalfy said:

شكرا يا أ عبد اللطيف على ردك 

بس اعئرني انا لسه في البدايات 

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

 

قصدي اخي الكريم نزل قاعدة البيانات كاملة

ولا يوجد شيء مستحيل

نحتاج الى الجداول وانت اقتطعت الجداول من القاعدة

فلا نستطيع عمل استعلام بدون جداول

[mohamed elalfy]

استاذي الف شكر

انا لم اقتطع شئ

هو جدول واحد بس

[jjafferr]

57 دقائق مضت, عبد اللطيف سلوم said:

نحتاج الى الجداول

هي موجودة في قاعدة البيانات ، ولكن مخفية 🙂

 

جعفر

[mohamed elalfy]

Up

اخواني واساتذتي هل يوجد شئ مش واضح لكي اتداركه

[jjafferr]

السلام عليكم 🙂

 

استعمل هذا الكود في التقرير Documents1 :

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)

'1
    If Me.annaul_1 = -1 Then
        Me.annaul_1.Visible = False: Me.based1.Visible = False: Me.rang1.Visible = False: Me.rang2.Visible = False
    Else
        Me.annaul_1.Visible = True: Me.based1.Visible = True: Me.rang1.Visible = True: Me.rang2.Visible = True
    End If
    
'2
    If Me.annaul_2 = -1 Then
        Me.annaul_2.Visible = False: Me.based2.Visible = False: Me.rang3.Visible = False: Me.rang4.Visible = False
    Else
        Me.annaul_2.Visible = True: Me.based2.Visible = True: Me.rang3.Visible = True: Me.rang4.Visible = True
    End If
    
'3
    If Me.annual_3 = -1 Then
        Me.annual_3.Visible = False: Me.based3.Visible = False: Me.rang5.Visible = False: Me.rang6.Visible = False
    Else
        Me.annual_3.Visible = True: Me.based3.Visible = True: Me.rang5.Visible = True: Me.rang6.Visible = True
    End If
    
'4
    If Me.annual_4 = -1 Then
        Me.annual_4.Visible = False: Me.based4.Visible = False: Me.rang7.Visible = False: Me.rang8.Visible = False
    Else
        Me.annual_4.Visible = True: Me.based4.Visible = True: Me.rang7.Visible = True: Me.rang8.Visible = True
    End If
    
'5
    If Me.annual_5 = -1 Then
        Me.annual_5.Visible = False: Me.based5.Visible = False: Me.rang9.Visible = False: Me.rang10.Visible = False
    Else
        Me.annual_5.Visible = True: Me.based5.Visible = True: Me.rang9.Visible = True: Me.rang10.Visible = True
    End If
    
'6
    If Me.annual_6 = -1 Then
        Me.annual_6.Visible = False: Me.till.Visible = False: Me.rang11.Visible = False: Me.rang12.Visible = False
    Else
        Me.annual_6.Visible = True: Me.till.Visible = True: Me.rang11.Visible = True: Me.rang12.Visible = True
    End If
     
End Sub

.

كما ان الاستعلام مصدر بيانات التقرير يجب ان يُصبح:

.

فيصبح التقرير:

.

 

جعفر

1159.Certificates.accdb.zip

[mohamed elalfy]

استاذنا جعفر 

الليه ينور على حضرتك ما شاء الله تبارك الله ربنا يجعل دعواتنا في ميزان حسناتك

والله اللسان يعجز عن الشكر 

ربنا يجعل ايامك كلها خير 

ويسدد خطاك دايما 

الف مليون شكر 

[jjafferr]

اعرف ان السؤال التالي سيكون ، وهل هناك طريقة علشان ما يكون هناك مسافات فارغة مكان الحقول المخفاة !!

 

والجواب بعمل تقرير فرعي ، هكذا :

.

.

جعفر

1159.1.Certificates.accdb.zip

[mohamed elalfy]

خلصت فيك كل الكلام 

الله يباركلك