توزيع الفصول على نصفي الورقة

[عبدالله باقشير]

السلام عليكم

توزيع الفصول على نصفي الورقة

غير اعدادات الكود حسب طلبك من هنا

'***********************************************

'***********************************************

'     اسم نطاق البيانات

Private Const NRng As String = "myDate"

'    رقم عمود الاسماء

Private Const cName As Byte = 2

'    رقم عمود النوع

Private Const ColumnSex As Byte = 3

' معيار البحث عن الاولاد في عمود النوع

Private Const SBoy As String * 3 = "ولد"

' معيار البحث عن البنات في عمود النوع

Private Const SGirl As String * 3 = "بنت"

'    رقم عمود الفصل

Private Const ColumnClass As Byte = 16

'    رقم عمود الدرجات

Private Const cDegree As Byte = 15


'***********************************************

'***********************************************

'     اسم ورقة الفصول

Private Const ShName As String = "فصول"

'    عدد اعمدة الطباعة

Private Const CountColumn As Byte = 13

'***********************************************

'***********************************************

توزيع الفصول على نصفي الورقة.rar

[ابو الآء]

بارك الله فيك استاذى الكبير<BR>مبدع بحق<BR>تقبل الله منا ومنك صالح الاعمال<BR>وكل عام وانت بخير

[أيسم إبراهيم]

السلام عليكم أستاذنا الكبير

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

و جعله في ميزان حسناتك

[احمد حمور-ابوعبدالله]

كعادتك اخي خبور خير

مبدع دائما

الى الامام

[قصي]

الله يبارك لك الله يبارك لك الله يبارك لك

الله يبارك لك الله يبارك لك

الله يبارك لك

[naderwatfa]

كود رائع .. بارك الله فيك

[محمدي عبد السميع]

بارك الله لك ايها الأخ الكريم والعالم الفذ ماشاء الله عمل ولاأروع

[علي سالم 75]

مشكور مشكور مشكور

مشكور مشكور مشكور

[محمدي عبد السميع]

للرفع للفائده رفع الله قدركم

[محمد مصطفى ابو حمزة]

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

[الطوفان]

بارك الله فيك

[MAHMOUD ALI YOUSSEF]

السلام عليكم

افكار رائعة

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

[عبد الحميد شقير]

جزاكم الله كل الخير ودمتم دائماً في رعاية الله 

[علي فاهم]

ربنا يحفظك ايها العالم الكبير عبد الله باقشير