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

حساب عدد مدينة محددة و عدد الخلايا الصحيحة


إذهب إلى أفضل إجابة Solved by jjafferr,

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

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

 كيف يمكن حساب عدد مدينة اسكندية فقط 
كيف يمكن حساب الخلايا الصحيحة 
كيف يمكن حساب الخلايا الفارغة


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

6000.mdb

Capture.JPG

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

شكر لك أستاذى 

 

=DCount("[Country]";"TestQ2";"[Country]='اسكندرية'")

ممكن افهم 
Country رقم و 1 ماذا تشير 
Country رقم 2 الى ماذا تشير 

بعد التجربة على 4000 سجل النموذج اصبح بطىء جدا عند فتح البيانات 

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

  • أفضل إجابة

وعليكم السلام:smile:

 

في النموذج TestF نضيف الحدث على التحميل ، و وحدة نمطية لحساب عدد الحقول:


Function Count_Fields()

    Dim rst As DAO.Recordset
    'Set rst = Forms!main!Datamasterform!TestF.Form.RecordsetClone
    Set rst = Me.RecordsetClone
    rst.MoveLast: rst.MoveFirst: RC = rst.RecordCount
    K1 = 0: K2 = 0
    
    For i = 1 To RC
        If rst!Country = "اسكندرية" Then
            K1 = K1 + 1
        End If
        
        If rst![on or of] = -1 Then
            K2 = K2 + 1
        End If
        
        rst.MoveNext
    Next i
    
    Me.Count_Esk = K1
    Me.Count_True = K2
    Me.Count_False = RC - K2
    
End Function

Private Sub Form_Load()

    Call Count_Fields
End Sub

.

وعند الضغط على زر التصفية ، ننادي الوحدة النمطية اعلاه:

    Call Form_TestF.Count_Fields

 

 

جعفر

660.2.Test2006.mdb.zip

  • Like 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