دمج ( انتظام وانتساب ) في صفحة واحدة

[egymina2012]

السلام عليكم اصدقائي واحبائي في اللة محترفي منتدي اكسيل 

اريد مساعدتكم في هذة الشيت عند الضغط علي الخلية  ( الفرقة ) في الصفحة الرئيسية يتم دمج ( انتظام وانتساب ) في صفحة واحدة  لكي ما يتم طابعة كل فرقة  انتظام وانتساب في صفحة واحدة 

علي ان يكون صفحة الانتظام في الاعلي مرتبة  البنات في الاول ثم الاولاد يليها مباشرا  بعد ذلك  صفحة الانتساب اسفل الانتظام مرتب بنات اولا ثم اولاد 

ملحوظة هناك اسماء سوف يتم اضافتها فيما بعد لكل فرقة 

 

فففففففففففففففففففففففف.xlsx

تم تعديل سبتمبر 28 بواسطه egymina2012

[أبومروان]

تجميع .xlsm

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

اتفضل لعله يكون المطلوب

 

[egymina2012]

السلام عليكم

اود اولا ان اشكركم جميعا علي عظيم محبتكم وتعبكم معي

* واما بعد فعند الضغط علي الفرقة الثانية او الثالثة او الرابعة يظهر عنوان ( اسماء الطلاب شعبة انتظام  - الفرقة الاولي)

انما الاسماء فهي تختص بالفرقة المراد طباعتها 

وليس عنوان الفرقة اي ان كل ازرار الفرق العنوان واحد  هو  اسماء الطلاب شعبة انتظام الفرقة الاولي وهذا العنوان خطا  المفترض ان يكون خاص بكل فرقة  اسماء طلاب الفرقة الاولي ( انتظام - وانتساب ) الثانية اسماء طلاب الفرقة الثانية ( انتظام - وانتساب ) الثالثة ااسماء طلاب الفرقة الثالثة ( انتظام - وانتساب ) الرابعة اسماء طلاب الفرقة الرابعة ( انتظام - وانتساب ) *  ولو امكن يتم ادراج عمود بعنوان الشعبة يكتب بة الطلاب انتظام او انتساب  علي ان يتم كتابة اسماء شعبة انتظام البنات اولا ثم الذكور ترتيب ابجدي  يلية اسماء انتساب بنات ثم ذكور ترتيب ابجدي

تم تعديل بالامس في 09:41 بواسطه egymina2012

[أبومروان]

اتفضل اليك الحل السريع تم ادارك الاخطاء المشار اليها

وتم عمل كود للنوع 

جرب وابلاغنا بالامر واي تعديل 

Copy of تجميع .xlsm

[egymina2012]

استاذي الفاضل مازالت المشكلة قائمة حيث يظهر في كل فرقة عدد (2) عنوان اسماء الفرقة الاولي و عنوان اخر بعنوان الفرقة  وقد تم حذف الصف الوصف والذي هو مسلسل الاسم الرقم الهاتف الرقم القومي الشعبة المبلغ سبب الاعفاء وايضا سبب الاعفاء غير محدد داخل الجدول بعد اضافة العمود 

اخيرا ارغب في معادلة التفقيد للعمود المبلغ في اخر صف اجمالي المبلغ هو فقط وقدرة بالعربي جنيها وبالعربي قرش لاغير 

Copy of تجميع .xlsm

تم تعديل منذ 5 ساعات بواسطه egymina2012

[Foksh]

مشاركة بسيطة ..

أخي الفاضل @egymina2012 ، تعدد الطلبات وكثرة التعديلات تربك وتشوش من يتقدم بتقديم حلول . لذا أرجو منك التوضيح بشكل أكثر وضوحاً للمطلوب ، ويا حبذا لو كان على شكل نقاط .

بخصوص طلب تصحيح اسم الفرقة وإضافة ( انتساب و انتظام ) . في الجزء التالي في الكود داخل ملفك الأخير ، وتحديداً في السطر

    ' تحديث عنوان الفرقة في شيت الطباعة
    wsPrint.Range("C2").Value = "اسماء الطلاب - " & gradeTitle

لاحظ هنا أنه يقوم بإضافة رقم الفرقة نصاً في الخلية C2 .. فإذا كنت تريدها في C3 أيضاً ، فقط أضف السطر التالي مباشرة أسفل الجزء الذي أشرت لك إليه :-

    wsPrint.Range("C3").Value = "اسماء الطلاب - " & gradeTitle & " ( انتظام - وانتساب )"

 

اما باقي طلباتك فأرجو منك إيضاحها لو تكرمت ..

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

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

اضافة الى مشاركة الزميلين أبومروان  - Foksh                           محاولة اعادة تنظيم اكواد الملف

ما تم عمله وتنظيمه  - الغاء جميع الاكواد المتعلقة بتحديد النوع والمكررة في صفحات الانتظام والانتساب الثمانية  وتم عمل كود واحد في WORKBOOK يقوم بتحديد نوع الشخص مع امكانية استتناء الصفحات التي ليس لها علاقة 

اظهار عناوين الجدول في شيت طباعة

إضافة عمود  سبب الاعفاء للجدول

إضافة الاجمالي بعد اخر صف به بيانات 

اضافة دالة التفقيط

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

إضافة زر طباعة

تحياتي للجميع

 

 

Copy of تجميع.xlsm

تم تعديل منذ 31 دقائق بواسطه عبدالله بشير عبدالله