پرینت در اکسل

Collapse
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • Mtba

    • 2019/06/27
    • 21
    #1

    پرسش پرینت در اکسل

    سلام من یک فایل اکسل دارم که عدد در ان نوشته و لیست یک سری ماشین آلات هست و به صورت افقی اعداد در جدول وارد شده که در حالت پرینت 21 صفحه میشود من اگر بخواهم کل جدول و در یک صفحه پرینت بگیرم باید چکار کنم؟تنظیمات مربوط به custom scalling هم انجام دادم و خیلی جدول ریز و غیر خوانا میشود؟
    اگر امکان داره کسی کمکم کنه
    برچسب ها: هیچ‌کدام
    • alfa

      • 2012/05/18
      • 157
      • 4.00
      #2
      نوشته اصلی توسط Mtba
      سلام من یک فایل اکسل دارم که عدد در ان نوشته و لیست یک سری ماشین آلات هست و به صورت افقی اعداد در جدول وارد شده که در حالت پرینت 21 صفحه میشود من اگر بخواهم کل جدول و در یک صفحه پرینت بگیرم باید چکار کنم؟تنظیمات مربوط به custom scalling هم انجام دادم و خیلی جدول ریز و غیر خوانا میشود؟
      اگر امکان داره کسی کمکم کنه


      اینطوری که امکانش نیست
      لطفا فایل نمونه بگذارید
      [FONT=tahoma]:Smilebb (31):[/FONT]

        کامنت

        • Mtba

          • 2019/06/27
          • 21
          #3
          این نمونه فایل هست به صورت افقی نوشته شده اگر بخواهیم در یک صفحه a4 پرینت بگیریم که صفحه به شکل landscape باشه
          فایل های پیوست شده

            کامنت

            • saed.rasa

              • 2014/11/02
              • 1054
              #4
              سلام

              امتحان کنید لطفا!
              فایل های پیوست شده
              [FONT=arial][SIZE=3]اگر کسی به شما کمک کرد، سمت راست پایین هر موضوع تیک [COLOR=#0000cd][B]«3پاس»[/B][/COLOR] یادتان نرود لطفا
              اگر مشکل تان حل شد، حتما تیک سبز رنگ [B][COLOR=#00cc00]«حل شد»[/COLOR][/B] در پست اول را بزنید
              [/SIZE][/FONT][SIZE=3][CENTER][FONT=arial]
              [/FONT][/CENTER]
              [/SIZE][FONT=arial][SIZE=3] اگر میخواهید بهتر و دقیق تر و سریع تر به شما کمک شود، یک [COLOR=#ee82ee][B]«فایل نمونه»[/B][/COLOR] قرار دهید
              فایل نمونه: حداکثر [U][COLOR=#ff0000]50 [/COLOR][/U]کیلوبایت - کوتاه، تقریبا [U][COLOR=#ff0000]10 [/COLOR][/U]سطری - به همراه جواب یا خروجی یا نتیجه مورد انتظار[/SIZE][/FONT][CENTER][FONT=arial][COLOR=#0000ff][SIZE=3][SIZE=3][SIZE=3][SIZE=3]مسیر ارسال فایل : پایین سمت چپ - تنظیمات اضافی - فایل پیوست[/SIZE][/SIZE][/SIZE] [/SIZE][/COLOR]
              [/FONT][/CENTER]

                کامنت

                • alfa

                  • 2012/05/18
                  • 157
                  • 4.00
                  #5
                  سلام


                  طراحی جدول وداشبورد و داده ها هنر است
                  متاسفانه شما این ظرافت را در فایلتون بکار نبردید


                  اگر واقعا نمیتوانید ترکیب جدولتون را تغییر دهید پس باید گزارش گیری و پرینت را به نوعی تغییر دهید


                  تنها راه حل شما همین راهی است که برادرمون آقا saed.rasa در پست قبلی گفته


                  1- راه حل دم دستی
                  2- طراحی جدولی جدید با فرمت آقا سعید در شیت دوم با ارجاع سلولها به سلول اصلی


                  نتیجه تقریبا یکی است


                  برای راه حل دم دستی از کدی که من براتون ارسال میکنم استفاده کنید
                  برای راه حل اساسی از جدول برادر سعید و ارجاع سلول به سلول استفاده کنید










                  Range("A1:A9").Select
                  Application.CutCopyMode = False
                  Selection.Copy
                  Sheets("Sheet2").Select
                  Range("A1").Select
                  ActiveSheet.Paste
                  Range("A10").Select
                  ActiveSheet.Paste
                  Range("A19").Select
                  ActiveSheet.Paste
                  ActiveWindow.SmallScroll Down:=15
                  Range("A28").Select
                  ActiveSheet.Paste
                  ActiveWindow.SmallScroll Down:=6
                  Range("A37").Select
                  ActiveSheet.Paste
                  Sheets("Sheet1").Select
                  ActiveWindow.SmallScroll Down:=-12
                  Range("B1:Y9").Select
                  Application.CutCopyMode = False
                  Selection.Copy
                  Sheets("Sheet2").Select
                  Range("B22").Select
                  ActiveWindow.SmallScroll Down:=-57
                  Range("B1").Select
                  ActiveSheet.Paste
                  Sheets("Sheet1").Select
                  ActiveWindow.SmallScroll ToRight:=7
                  Range("Z1:AW9").Select
                  Application.CutCopyMode = False
                  Selection.Copy
                  Sheets("Sheet2").Select
                  Range("B10").Select
                  ActiveSheet.Paste
                  Sheets("Sheet1").Select
                  Range("AX1:BU9").Select
                  Application.CutCopyMode = False
                  Selection.Copy
                  Sheets("Sheet2").Select
                  Range("B19").Select
                  ActiveSheet.Paste
                  Sheets("Sheet1").Select
                  Range("BV1:CS9").Select
                  Application.CutCopyMode = False
                  Selection.Copy
                  Sheets("Sheet2").Select
                  ActiveWindow.SmallScroll Down:=9
                  Range("B28").Select
                  ActiveSheet.Paste
                  ActiveWindow.ScrollColumn = 2
                  ActiveWindow.ScrollColumn = 3
                  ActiveWindow.ScrollColumn = 4
                  ActiveWindow.ScrollColumn = 5
                  ActiveWindow.ScrollColumn = 6
                  ActiveWindow.ScrollColumn = 7
                  ActiveWindow.ScrollColumn = 8
                  Sheets("Sheet1").Select
                  Range("CT1:DQ9").Select
                  Application.CutCopyMode = False
                  Selection.Copy
                  Sheets("Sheet2").Select
                  ActiveWindow.SmallScroll Down:=15
                  ActiveWindow.ScrollColumn = 7
                  ActiveWindow.ScrollColumn = 6
                  ActiveWindow.ScrollColumn = 5
                  ActiveWindow.ScrollColumn = 4
                  ActiveWindow.ScrollColumn = 3
                  ActiveWindow.ScrollColumn = 2
                  ActiveWindow.ScrollColumn = 1
                  Range("B37").Select
                  ActiveSheet.Paste
                  Sheets("Sheet1").Select
                  Range("DR1:DX9").Select
                  Application.CutCopyMode = False
                  Selection.Copy
                  Sheets("Sheet2").Select
                  ActiveWindow.SmallScroll Down:=9
                  Range("B46").Select
                  ActiveSheet.Paste
                  [FONT=tahoma]:Smilebb (31):[/FONT]

                    کامنت

                    قبلی template بعدی
                    چند لحظه..