استفاده از سربرگ و زیر صفحه برای چاپ سر ستون ها و ته ستون ها [بایگانی]

maziardm

2013/09/21, 06:01

با سلام و روز خوش
ما یه شیت اکسل با کلی ردیف (که در چند صفحه قابل چاپ هستند) و تعدادی ستون داریم. این ستون ها هر کدوم یه اسم ستون دارند. برای مثال ردیف، شرح، نام، تعداد، مقدار و غیره. که برخی ستون ها دارای مقادیر عددی هستیم که می خواهیم مقادیر اون ها در هر صفحه جمع زده بشه و در صفحه بعدی جمع کل صفحات و همینطور تا آخر. من می تونم به صورت دستی و با جدا کردن صفحات از هم این کار رو بکنند. ولی می خوام ببینم میشه از قابلیت هیدر و فوتر استفاده کرد.
با این شرط که برای هر صفحه علاوه بر عنوان و شماره صفحه و غیره ، سر ستون ها (ردیف و شماره و شرح و تعداد و غیره) و ته ستون ها (شامل جمع ستون ها و توضیحات و غیره درج بشه).
امیدوارم منظورمو خوب رسونده باشم و از دوستان هم می خوام جواب لازم رو بدند. با تشکر از شما

~M*E*H*D*I~

2013/09/21, 06:38

امکان این کار هست ، به این شکل که شما از مجموعه سرستون ها یک عکس تهیه کنید و اگر در زیر جدول هم مواردی هس همینطور بعد از طریق pagelayout و قسمت header&footer قسمت custome رانتخاب و عکس در یکی از خانه های چپ وسط یا راست را وارد کنید در فوتر هم به همین شکل اقدام کنید صفحه را هم در یکی دیگر از خانه ها وارد کنید ایراد این کار اینه که نیاز به تنظیمات زیادی داره تا پرینت خوب دربیاد

Nima

2013/09/21, 10:27

فکر کنم برای اینکار باید از با توجه به مارجین صفحه یعنی اینکه چه تعداد ردیف تو هر صفخه پرینت نمایش داده میشه تو یه سری سلول فرمولهاتو بنویسی مثلا جمع مقادیر موجود در ستون a رو (البته تعداد موجود در صفخه مورد نظر) بعد با استفاده از vba مقادیر حاصل از اون فرمول هارو تو فوتر یا هدر نمایش بدی.

Nima

2013/09/22, 09:34

به لینک زیر هم یه سرس بزنید

http://chandoo.org/forum/threads/how-to-insert-a-formula-in-footer.12144/

maziardm

2013/09/22, 11:47

به لینک زیر هم یه سرس بزنید

http://chandoo.org/forum/threads/how-to-insert-a-formula-in-footer.12144/

با سلام و تشکر
به لینک زیر فوق رفتم. یه سری اطلاعات گرفتم. اما مثال هاش نمیشه دانلود کرد. ظاهرا سایت مربوطه پاکش کرده.
با تشکر

maziardm

2013/09/22, 11:51

فکر کنم برای اینکار باید از با توجه به مارجین صفحه یعنی اینکه چه تعداد ردیف تو هر صفخه پرینت نمایش داده میشه تو یه سری سلول فرمولهاتو بنویسی مثلا جمع مقادیر موجود در ستون a رو (البته تعداد موجود در صفخه مورد نظر) بعد با استفاده از vba مقادیر حاصل از اون فرمول هارو تو فوتر یا هدر نمایش بدی.

ممنون از جوابت نیما جان. میشه با یه مثال برام توضیح بدید؟
یه فایل نمونه گذاشتم. میشه روش کار کنید و بعد بهم جواب بدید. ممنون میشم.
با تشکر از شما

Nima

2013/09/22, 12:05

فایل ضمیمه رو ببینید

فقط با اجرای ماکرو صفحات برای پرینت ارسال میشه برای جلوگیری از این کار میتونید از پرینتر های مجازی مثل adobe pdf و غیره استفاده کنید.

Nima

2013/09/22, 12:33

ممنون از جوابت نیما جان. میشه با یه مثال برام توضیح بدید؟
یه فایل نمونه گذاشتم. میشه روش کار کنید و بعد بهم جواب بدید. ممنون میشم.
با تشکر از شما

تو این سایت یه ویدیو آموزشی در همین رابطه هست:

http://learnmrexcel.wordpress.com/2013/03/18/learn-excel-2013-subtotal-in-footer-podcast-1668-part-1/

maziardm

2013/09/23, 04:56

فایل ضمیمه رو ببینید

فقط با اجرای ماکرو صفحات برای پرینت ارسال میشه برای جلوگیری از این کار میتونید از پرینتر های مجازی مثل adobe pdf و غیره استفاده کنید.

با سلام و صبح به خیر
نیما جان ممنونم. فایلتم دانلود کردم اما 2 تا سوال برام پیش اومده ممنونم جواب بدید.
1. میشه کاری کرد که برای مثال جمع هر ستون رو هم در انتهای هر صفحه بیاره.
2. میشه به منم بگید چی کار کرید که این هیدر و فوتر اومد؟
راستی آدرس لینکی که هم برام گذاشتید فیلتره. چون الان فیلتر شکن ندارم نمی تونم نظری بدم.
بازم تشکر

maziardm

2013/09/25, 09:12

با سلام و صبح به خیر
نیما جان ممنونم. فایلتم دانلود کردم اما 2 تا سوال برام پیش اومده ممنونم جواب بدید.
1. میشه کاری کرد که برای مثال جمع هر ستون رو هم در انتهای هر صفحه بیاره.
2. میشه به منم بگید چی کار کرید که این هیدر و فوتر اومد؟
راستی آدرس لینکی که هم برام گذاشتید فیلتره. چون الان فیلتر شکن ندارم نمی تونم نظری بدم.
بازم تشکر

با سلام مجدد
؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ ؟

Nima

2013/09/25, 09:17

با سلام به لینک زیر هم مراجعه کنید:

http://social.msdn.microsoft.com/Forums/en-US/dee7b9ec-bf87-4f56-9511-a4c061af04f0/how-to-insert-formula-in-footer-while-printing-for-each-page

فایل رو هم پیوست کردم.

زهره

2013/09/27, 14:56

:o:confused:

امين اسماعيلي

2013/09/27, 15:26

با درود
میبینم همه گیج شدیم آره. ولی بازم ممنون از همه واسه تلاش برای پیدا کردن جواب. امیدوارم درست فهمیده باشم . ایشون میخوان که توی هر صفحه انتهاش یه سری جمع اون صفحه در انتهاش
باشه و هم جمع صفحات قبل. خوب فک کنم دیق یادم نیست این کار قبل توسط استاد شمس هم انجام شده حالا کجا بود یادم نیست. اما اگر من درست برداشت کرده باشم همونطور که آقا نیما هم گفتن میشه بگیم که تو هر صفحه چند ردیف چاپ بشه و بعد خطوط پیج بریک رو رو همون سل جمع ها قرار بدیم و در اخر کد پرینت .

maziardm

2013/10/19, 11:43

با درود
میبینم همه گیج شدیم آره. ولی بازم ممنون از همه واسه تلاش برای پیدا کردن جواب. امیدوارم درست فهمیده باشم . ایشون میخوان که توی هر صفحه انتهاش یه سری جمع اون صفحه در انتهاش
باشه و هم جمع صفحات قبل. خوب فک کنم دیق یادم نیست این کار قبل توسط استاد شمس هم انجام شده حالا کجا بود یادم نیست. اما اگر من درست برداشت کرده باشم همونطور که آقا نیما هم گفتن میشه بگیم که تو هر صفحه چند ردیف چاپ بشه و بعد خطوط پیج بریک رو رو همون سل جمع ها قرار بدیم و در اخر کد پرینت .

با سلام و روز خوش به تمامی دوستان

از اینکه گیج تون کردم پوزش. ولی خوشحالم سوالی رو طرح کردم که بتونه پاسخ متفاوتی داشته باشه. فکر کنم پاسخ به این سوال بتونه به خیلی از عزیزان به خصوص خودم کمک کنه. بازم از پاسخ دوستان و حتی تلاششون متشکرم

نیما جان دست فایلت رو گرفتم. ممنون

راستی این فایل پیوستی دیروز به دستم رسید. اگه عزیزان دانلودش کنند و به پرینت پریویو برند می بینید که ردیف 1 تا سه در هر صفحه تکرار شده. لطفا اگه میشه بگید چطوری این اتفاق افتاده. چون ظاهرا با ماکرو و بر نامه نویسی و این حرف ها اتفاق نیوفتاده. با تشکر از شما عزیزان

Nima

2013/10/19, 11:50

با سلام

با تنضیم header میتونید اینکار رو بکنید
Page Layout >>> Print Titles >>> Rows to repeat at top

maziardm

2013/10/20, 05:11

راستی میشه دوستان یه کدی بنویسند که بشه تعیین کرد که در هر صفحه 20 تا ردیف رو برای مثال با اندازه ارتفاع 1 سانت رو جدا و پایینش تو یه ردیف جمع مقادیر عددی رو بزنه و در یک صفحه چاپ کنه. و همینتطور این کارو تا آخرین ردیف تکرار کنه. یکی از دوستان یه جایی همچین چیزی رو طراحی کرده بود و جالب هم بود ولی من فایلشو پیدا نمی کنم. با تشکر

~M*E*H*D*I~

2013/10/20, 06:54

راستی میشه دوستان یه کدی بنویسند که بشه تعیین کرد که در هر صفحه 20 تا ردیف رو برای مثال با اندازه ارتفاع 1 سانت رو جدا و پایینش تو یه ردیف جمع مقادیر عددی رو بزنه و در یک صفحه چاپ کنه. و همینتطور این کارو تا آخرین ردیف تکرار کنه. یکی از دوستان یه جایی همچین چیزی رو طراحی کرده بود و جالب هم بود ولی من فایلشو پیدا نمی کنم. با تشکر

برای footer ماکروی زیر رو امتحان کنید ، بجای A55 تا A57 ردیف های مد نظر خودتون رو قرار بدید

Sub Macro1()
Dim StrFtr As String
StrFtr = Range("A55") & vbLf & Range("A56") & vbLf & Range("A57")
ActiveSheet.PageSetup.LeftFooter = StrFtr
End Sub