اظهار المجموع في نهاية كل صفحة

[mmjksa]

اخواني واخواتي اسعدالله اوقاتكم بكل خير

حقيقه قبل ان اكتب هذا الاستفسار حاولت بكل الطرق ان اجد حل ولم استطع وكذلك بحثت في هذا المنتدى الرائع ولم اجد حل!!!!


عندي ملف اكسل عباره عن اسماء موظفين يحتوي على 1000 اسم وفي نهاية الملف يوجد مجموع الرواتب والحسميات ...الخ.

المطلوب احبتي في الله اظهار المجموع في كل نهاية صفحة سوى في الشاشة او في الطباعة مثل رأس الصفحة تستطيع تكرارها في كل الصفحات.

حيث لو اضفت اسم جديد في اول الصفحة او اي صفحة لايتغير مكان المجموع ،، يعني تثبيت المجموع في نهاية كل صفحة.

واشكر الجميع على حسن التعاون.

وللاطلاع انظر المرفق

Prso.rar

تم تعديل مارس 23, 2008 بواسطه mmjksa

[mmjksa]

شباب هل السؤال صعب لهذه الدرجه!!!!!!!!!!

[mmjksa]

ارجوكم خبراء البرمجة ماهو الحل محتاجه ضروري!!!!

[mmjksa]

ارجوكم ماهو الحل!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

[ابو اسامة العينبوسي]

السلام عليكم

عندى اقتراح

نصحت احد الاخوه به و تم بشكل جيد

اجعل المجموع في اول صف و قم بتجمده من تجميد الواح و بذلك يبقى المجموع امامك

الى ان ييسر الله الحل

اما الطباعة في سهله

حدد الخانه التى تريدها ان تظهر المجموع و اجعلها كتذييل للصفحه برمجيا مثل الكود التالى

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterFooter = ActiveSheet.Range("a169:f169")
End Sub

تم تعديل مارس 25, 2008 بواسطه ابو اسامة العينبوسي

[ابو اسامة العينبوسي]

السلام عليكم

ActiveSheet.PageSetup.CenterFooter = Cells(169, 1) & " " & Cells(169, 2) & " " & Cells(169, 3) & " " & Cells(169, 4) & "" & Cells(169, 5) & " " & Cells(169, 6)

تم تعديل الكود

و ساعدله مره ثالثه

تم تعديل مارس 25, 2008 بواسطه ابو اسامة العينبوسي

[mmjksa]

شكرا لاهتمامك اخي ابو اسامة وبارك الله فيك وفي علمك

والتجربة قائمة

[mmjksa]

اخي ابو اسامة

حقيقة جربت الطريقة الاولى اللي نصحة به احدى الاخوه، لكن بعد تجميد السطر الاول الذي به المجموع فانه يظهر المجموع الكلي وليس مجموع الصفحة، فهل يوجد حل لمجموع الصفحه.

اما الكود فلم استطع استخدامة، ليس لدي خبره جيده لاستخدامة ، فارجوا تعديل الملف المرفق في اول المشاركة.

اكرر شكري لك عزيزي .

[نزار سليمان عيد]

اخي الحبيب ابو اسامة السلام عليكم

مداخلة واقتراح فيوجد لديك مشاركة سابقة حول اظهار المجموع في نهاية كل عمود لو اضفنا هذا الكود مع كود تنسيق الصفحات ليظهر كل مجموع عند اجراء الطباعة واعتقد انها المشاركة رقم 6 على الرابط

http://www.officena.net/ib/index.php?act=a...st&id=16239

تم تعديل مارس 26, 2008 بواسطه نزار سليمان عيد

[mmjksa]

اخواني الاكارم

صدقوني لم استطع الاستفادة من حلولكم .......... ارجوا ان تضعونها بصيغت ملف اكسل لكي اتعلم منها.

وشكرا للجميع

تم تعديل مارس 28, 2008 بواسطه mmjksa

[mmjksa]

هل يوجد حل ياشباب

[طارق محمود]

السلام عليكم

إخواني الأفاضل

أعتقد أن عندي الحل ولايحتاج إلي فيجيوال بيسيك

ففي أدوات الإكسل مايسمي بالبيفوت تيبل Pivot Table

وكل ماعليك أن تتقن إستخدام هذه الأداة فهي فعالة تماما لمن يتعامل مع بينات كبيرة أو قواعد بيانات

وبدون تفصيلات فقط يتعين عليك أن تضيف عمود جديد فيه أرقام مسلسلة للموظفين لتعينك علي تجميعهم في مجموعات

ثم تقوم بعمل الــ Pivot Table للبيانات التي تحتوي علي العمود الجديد الذي فيه الأرقام المسلسلة

سيقوم الإكسل بإعادة نقل البيانات في صفحة أخري worksheet

ولكن بالتنسيق الذي تمليه عليه

يمكنك النظر في الملف المرفق Sheet4

ولاتنسي عند إضافة بيانات جديدة أن تفعل شيئين مهمين

(1) أن تضيف رقم للموظف الجديد

(2) أن تجدد أو تفعل الــPivot Table (كليك يمين داخل الجدول ثم إختر Refresh Data علامة التعجب الحمراء)

مثلا أنا إخترت لك في المثال الذي أرسلته أن يتم التجميع كل ثلاثون إسم 30

إن أردت تغيير الثلاثون إلي 40 أربعون مثلا فلتتبع الآتي:

(1) كليك يمين داخل الجدول ( الــPivot Table )

(2) بشرط أن يكون مؤشر الماوس علي أي خلية فعالة في العمود التجميعي (الذي فيه الأرقام المسلسلة)

وليكن الخلية A4 أو A22 أو A40 في Sheet4 في مثالنا

(3) ستظهر لك قائمة تختار منها المجمعات Grouping وتغير الرقم 30 إلي 40 أو إلي ماتشاء

(4) يمكن الرجوع إلي الصورة المرفقة النصف الأيسر

(5) لإلغاء وتفعيل فاصل الطباعة عند كل تجميع جزئي Subtotal إتبع الصورة المرفقة النصف الأيمن

سامحوني لضعف الشرح ولأنني لم أعمل علي نسخة الإكسل المعرية مطلقا ولا أعلم الترجمة الصحيحة لــPivot Table أو Refresh Data

بالطبع سيعاوننا الإخوان في ذلك

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

هذا ما لدي وأرجو أن يفيدكم

والله أعلم

ونسألكم الدعاء

والسلام عليكم

أخوكم/ طارق محمود

Piv_Table.rar

[mmjksa]

اسعد الله اوقاتكم جميعا

وشكرا على من ساعدني والشكر موصول للاخ عمر الحسيني الذي دلني على حل ممتاز وتجدونه بالمرفق.

ولكن واجهتني بعض المشاكل التي لم استطع حلها وهي:

اولا: اذا وضعت قائمة في احدى الاعمده ونفذة (تجهيز بيانات) تظهر لي خطاء.

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

واكرر شكري للجميع

Total_End_Page.rar

[omar elhosseini]

الاخ mmjksa

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

وفى اليوم التالى طلبت اضافة تعديل اخر ( حتى لم تكلف نفسك عناء الرد رغم استعجالك لى )

وتم وضع التعديل الثانى بالمنتدى بنفس اليوم مع تأكدى الف فى المائة انه يعمل وسليم

فلا يجوز ان تقوم بتعديل هيكل البيانات المدخلة وتقول

وشكرا على من ساعدني والشكر موصول للاخ عمر الحسيني الذي دلني على حل ممتاز وتجدونه بالمرفق

ولكن واجهتني بعض المشاكل التي لم استطع حلها وهي:

اولا: اذا وضعت قائمة في احدى الاعمده ونفذة (تجهيز بيانات) تظهر لي خطاء.

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

واكرر شكري للجميع

فأين الحل الممتاز بمرفقك بعد ان عدلت عليه

وها هو الملف الاصلى الذى وضعته لك سابقا وليس به مشاكل

_________________________.rar

تم تعديل مايو 5, 2008 بواسطه أبو تامر

[نزار سليمان عيد]

اخي الكريم السلام عليكم

انظر للمرفق واي استفسار اعلمني من فضلك

______________________________.rar

[mmjksa]

اخي الكريم ابوثامر سلمة الله

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

ام بالنسبة للتعديل فكلامك صحيح مية بالمية عدلته حسب ما احتاجه لان عندي قائمتين منسدله وهذه جديده لم تكن في الطلب السابق فعدلت الملف ورفعته لكي تساعدني اخي الكريم في الحل.

وانا قلت حلك ممتاز وافادني فارجوا ان تساعدني في الملف الذي عدلته لانه يظهر لي خطاء في حالة التنفيذ.

واكرر شكري لك

اخي الكريم نزار سليمان عيد سلمة الله

حلك جيد وفكرة رصيد مابعده ورصيد ماقبله ممتازة، ولكن حين ما اضيف سطر جديد في الصفحة الاولي واضع فيها المعلومات المجموع ينزل في الصفحه الثانية !!!

وكذلك اكرر شكري لك

[mmjksa]

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

اخي
حقيقة انني حاولت حل المشكلة ولم استطع وهي ببساطة اظهار المجاميع في نهاية كل صفحة وليس مجموع كل صفحة على حدى بل المجاميع مترابطة في كل نهاية صفحة مجموع الصفحات السابقة وفي النهاية المجمووع الكلي.

اكرر شكري لك.

[رفيق محمد]

الاخوة الكرام

تحية طيبة

الاخ نزار

ملفك رائع

ولكن هناك بعض الملاحظات

فمع تغيير بعض التنسيقات "ارتفاع الصفوف، تعديل العوامش" تذهب صفوف المجاميع مع الباقي البيانات ويصبح الحل اصعب

لقد رايت طلب الاخ "mmjksa" في احد ملفات الاكسس وهو جمع صفوف كل صفحة في تذييل الصفحات ولا ادري ان كان هذا ممكنا مع الاكسل ام لا؟

يعني ان المجموع في ذيل الصفحة يكون للبيانات الظاهرة في هذه الصفحة فقط اياً كان عدد صفوفها

اما خانة المجموع الكلي فيمكن وضعها في ذيل جدول البيانات كاي جمع لمجموعة الصفوف

مع خالص تحياتي

[الجزيرة]

أبو تامر رائع كعادتك ملف رائع بالفعل وفكرة عبقرية كعادة أفكارك : )

[mmjksa]

مع التحية والتقدير لابوثامر العزيز

ارجوا الرد على المشاركة 17 للاهمية القصوى

تحياتي

[omar elhosseini]

الاخ mmjksa

اخى حاليا مشغول بامر ما

وسأحاول اجابة طلبلك فلا تتعجلنى

ملحوظة ::

ارجو تأكيد فهمى لما تطلب ::

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

وبالتالى سيكون المجموع الكلى بالصفحة الاخيرة

[omar elhosseini]

الاخ mmjksa

شاهد المرفق اخى

__________________________2.rar

[mmjksa]

اخي العزيز ابوثامر سلمه الله

اولا: الاصيل اصيل.

ثانيا: اسف على اشغالك واخذ وقتك.

ثالثا: اشكرك من كل قلبي على سعة صدرك ومجهودك الرائع واعرف ان ليس انا وحدي الذي يشغل الجميع يحتاجونك، اللهم اجعل كل حرف تكتبة لاجل مساعدة من يحتاج مساعده يقابلة حسنه في موازين اعمالك اللهم امين.

حقيقه هذا المطلوب وماقصرت عزيزي.

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

اكرر شكري الدائم لك

[mmjksa]

هل من مساعدة

[mmjksa]

في الانتظار احر من الجمر