كيفية التعامل مع الفورم Continous Forms

ما يصير يا شباب و لا واحد عنده جواب على سؤالي.

للرفع

يمكنك أخي أن تعمل دوارة من خلالها تضع الكود مثلا

for i = 1 to record count

تضع هنا الكود مالك 

docmd.movenext
next i

لا تنسى تعد السجلات قبل وضع الكود

وطرق العد كثيرة منها

أي حقل في الفورم تنسخه في تذييل النموذج

وتكتب داخله

=count ([اسم الحقل])

أشكرك يا أخ omani

لقد أستخدمت الطريقة و كانت ناجحة تماما

و قد استخدمت للعد الطريقة التالية

DoCmd.GoToRecord , , acLast

s2 = Form.CurrentRecord

DoCmd.GoToRecord , , acFirst

For i = 1 To s2

(الكود هنا)

If Form.CurrentRecord < s2 Then

DoCmd.GoToRecord , , acNext

End If

Next i

أشكرك مرة أخرى