أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
khaled alborene Eslam Abdullah-- لا تميز خلال هذه الفترة YasserKhalil تثبيت الكود علي خليه معينه اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .





كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة

أحبتى فى الله السلام عليكم ورحمة الله وبركاته ---------------------------------- فى بعض الأحيان يتم إدخال كم كبير من الب ..



25-09-2018 10:34 مساء
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 611
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 55
يتابعهم : 9
يتابعونه : 523
قوة السمعة : 6757
الاعجاب : 193
 offline 

أحبتى فى الله
السلام عليكم ورحمة الله وبركاته
----------------------------------
فى بعض الأحيان يتم إدخال كم كبير من البيانات فى ورقة العمل يصل إلى 5000 أو 10000 صف
ومن الصعب تحديد فواصل الصفحات (_ عدد الصفوف المراد طباعتها فى كل صفحة ) يدويا بالطريقة المعتادة
لذلك معكم اليوم كود بسيط لتحديد فواصل الصفحات تلقائيا بالكود
بمجرد إدخال عدد الصفوف المراد طباعته فى كل صفحة
يتم المطلوب
وهذا هو الكود المستخدم
Sub InsertPageBreaks()
Dim lr As Long
Dim sh As Worksheet
Set sh = Application.ActiveSheet
On Error Resume Next
'----------------------------------------------------
M = " أكاديمية الصقر للتدريب "
M_D = Application.InputBox("أدخل عدد الصفوف المراد طباعتها فى كل ورقة    " & Chr(10) & "---------------------------------------------------" _
& Chr(10) & "     " & "Enter the number of rows to print in each sheet" & Chr(10), M)
'--------------------------------------------------------------------------
sh.ResetAllPageBreaks
     lr = Application.CountA(sh.Range("A:A")) + 1
     For i = M_D + 3 To lr Step M_D
           sh.HPageBreaks.Add Before:=sh.Cells(i, 1)
Next
'--------------------------------------------------------------------------
   ActiveSheet.VPageBreaks(1).DragOff Direction:=xlToRight, RegionIndex:=1
       ActiveSheet.PageSetup.PrintArea = ""

ActiveSheet.PageSetup.PrintArea = "$A$2:$I$" & lr
End Sub



شرح الكود داخل الملف المرفق
--------------------------

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
---------------------
أخوكم / محمد الدسوقى
 
 
  Insert Page Breaks.rar   تحميل rar مرات التحميل :(55)
الحجم :(88.239) KB



تم تحرير الموضوع بواسطة :محمد الدسوقى
بتاريخ:26-09-2018 09:53 مساء


أثارت هذه المشاركة إعجاب: تاج الدين، EM_ACC، yousef_kaf، hassona229،





25-09-2018 10:51 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 6678
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 407
قوة السمعة : 18614
الاعجاب : 782
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
وعليكم السلام أخي الغالي محمد الدسوقي
بارك الله فيك وجزاك الله خيراً على الموضوع المميز والرائع .. جعله الله في ميزان حسناتك يوم القيامة





25-09-2018 11:31 مساء
مشاهدة مشاركة منفردة [2]
ali mohamed ali
menu_open
مشرف على منتدى الاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 20-11-2017
رقم العضوية : 1757
المشاركات : 1103
الدولة : مصر
الجنس : ذكر
يتابعهم : 0
يتابعونه : 51
قوة السمعة : 4704
الاعجاب : 333
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
جزاك الله كل خير استاذ محمد وبارك الله على هذا الموضوع المميز



توقيع :ali mohamed ali
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى حل أى مشكلة او أستفسار لديك مع إضافة رد بشكره
أو دعوة لمن قدم اليك المساعدة,فالجميع هنا يعمل على مساعدة
 الاخرين لوجه الله وان تحتسب له اجر عند الله


25-09-2018 11:33 مساء
مشاهدة مشاركة منفردة [3]
أحمد يوسف
menu_open
عضو ماسي
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 01-03-2018
رقم العضوية : 4669
المشاركات : 368
الجنس : ذكر
يتابعهم : 0
يتابعونه : 7
قوة السمعة : 549
الاعجاب : 16
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
بارك الله فيك استاذى الكريم





25-09-2018 11:44 مساء
مشاهدة مشاركة منفردة [4]
Eslam Abdullah
menu_open
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1435
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 4
يتابعهم : 0
يتابعونه : 74
قوة السمعة : 8934
الاعجاب : 167
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
ما شاء الله ، بارك الله فيك على هذه الاعمال الرائعه
دائما ما تقدم ما هو ملموس ومطلوب فى الواقع العملى
جعلها الله بميزان حسناتك يوم القيامه 81






26-09-2018 07:24 صباحا
مشاهدة مشاركة منفردة [5]
نصر الإيمان
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-02-2018
رقم العضوية : 4397
المشاركات : 257
الجنس : ذكر
تاريخ الميلاد : 29-12-1985
يتابعهم : 8
يتابعونه : 3
قوة السمعة : 593
الاعجاب : 27
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
جزاك الله خيرا استاذ محمد...111





26-09-2018 10:30 مساء
مشاهدة مشاركة منفردة [6]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 611
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 55
يتابعهم : 9
يتابعونه : 523
قوة السمعة : 6757
الاعجاب : 193
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
أساتذتى الكرام
بارك الله فيكم 
مشكور ...... مروركم ...... العطر ...... على ...... الموضوع
مشكور... ......مشكور.....................مشكور... ......مشكور
مشكور.............مشكور..............مشك ور........ ....... مشكور
مشكور.......................مشكور....... .......... ..........مشكور
مشكور........................من القلب.........................مشكور
مشكور. ........................................ .......... ...مشكور
مشكور................................... .......... .. مشكور
مشكور................................... .....مشكور
مشكور................................مشك ور
مشكور.......................مشكور
مشكور.................مشكور
مشكور.....مشكور
مشكو رمشكور
مشكور





27-09-2018 08:01 صباحا
مشاهدة مشاركة منفردة [7]
mahmoud ayad
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 15-03-2018
رقم العضوية : 4874
المشاركات : 145
الجنس : ذكر
تاريخ الميلاد : 29-5-1982
الدعوات : 1
يتابعهم : 4
يتابعونه : 4
قوة السمعة : 355
الاعجاب : 10
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
أحسنت قولا وعملا وشرحا وجهدا
بارك الله فيك استاذنا ...





27-09-2018 12:26 مساء
مشاهدة مشاركة منفردة [8]
بكار للأبد
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-01-2018
رقم العضوية : 3730
المشاركات : 229
الجنس : ذكر
تاريخ الميلاد : 13-9-1973
يتابعهم : 6
يتابعونه : 8
قوة السمعة : 1784
الاعجاب : 17
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
ملف أكثر من رائع جزاك الله كل خير





27-09-2018 07:58 مساء
مشاهدة مشاركة منفردة [9]
محمدعبدالسلام
menu_open
عضو نشيط
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 28-08-2017
رقم العضوية : 278
المشاركات : 95
الجنس : ذكر
تاريخ الميلاد : 19-6-1981
يتابعهم : 2
يتابعونه : 2
قوة السمعة : 109
الاعجاب : 0
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
جزاك الله كل خير استاذ محمد





27-09-2018 08:34 مساء
مشاهدة مشاركة منفردة [10]
salim
menu_open
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 43
المشاركات : 388
الجنس : ذكر
تاريخ الميلاد : 1-5-1989
الدعوات : 1
يتابعهم : 13
يتابعونه : 16
قوة السمعة : 3165
الاعجاب : 187
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
كود رائع بارك الله بك استاذ محمد
  هناك موضوع مشابه على هذا العنوان 
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب





27-09-2018 09:22 مساء
مشاهدة مشاركة منفردة [11]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 611
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 55
يتابعهم : 9
يتابعونه : 523
قوة السمعة : 6757
الاعجاب : 193
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة
تحياتى لأستاذى الكبير / سليم
دائما أتعلم منك الكثير
وكما عودتنا على أكوادك الرائعة 
زادكم الله علما وخلقا وحلما





29-09-2018 09:49 صباحا
مشاهدة مشاركة منفردة [12]
الصقر
menu_open عضوية موثقة
مدير المنتدى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 2
المشاركات : 1690
الجنس : ذكر
الدعوات : 15
يتابعهم : 0
يتابعونه : 566
قوة السمعة : 17460
الاعجاب : 275
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif كود إدراج فواصل صفحات وتحديد عدد الصفوف فى كل صفحة للطباعة

اعمال رائعه استاذ محمد بارك الله فيك
142





توقيع :الصقر

اخى العضو الكريم
اذا كنت ترى ان المنتدى مفيد لك
فكن سفيرا لنا بدعوة الاخرين للانضمام معنا
فالدال على الخير كفاعله




المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
إدراج فواصل الصفحات في عدد ثابت من الصفوف لعدة اوراق سعيد بيرم ابوعبدالرحمن
9 1880 سعيد بيرم ابوعبدالرحمن

الكلمات الدلالية
إدراج ، فواصل ، صفحات ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 02:16 صباحا

أعلن هنا
أعلن هنا
أعلن هنا