ارجو تعديل الملف

[محمد الحسينى]

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

ولكن عندما وضعت جميع اسماء الطلاب فى الملف حدث خطأ فى ارقام الجلوس عند الرقم 78 واعطانى بعدها ارقا م400

ولم يعطينى التسلسل كامل فأرجو التعديل ولسيادتكم جزيل الشكر

 

كشف مناداه - Copy - Copy.rar

[احمد بدره]

السيد الأستاذ الفاضل / محمد الحسيني تم تعديل الملف وإليك المرفق

كشف مناداه - Copy - Copy.rar

[محمد الحسينى]

بارك الله فى حضرتك

[بن علية حاجي]

السلام عليكم

تعديل على ملف الأخ ahmedkamelelsayed0 مع إضافة كود لطباعة بطاقات كل الطلبة مهما كان عددها... أرجو أن يفي الغرض

بن علية حاجي

كشف مناداة.rar

[ناصر سعيد]

Sub طباعة()
'هذا الكود خاص بالمحترم بن عليه
'(K1) هذه الحليه هي خليه عدد الصفات التي ستطبه
'وهذه هي معادله عدد الصفحات
'=ROUNDUP(MAX('مناداة 1'!$A:$A)/10;0)
For I = 1 To [K1]

  If I <= [K1] Then
    [G1] = I
    ActiveWindow.SelectedSheets.PrintOut Copies:=1
  End If
Next
[G1] = 1
End Sub

جزاك الله كل خير وبارك فيك استاذ بن عليه

تم تعديل ديسمبر 9, 2017 بواسطه ناصر سعيد
التنسيق