پرینت از شیت پنهان

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

    • 2019/02/05
    • 70
    #1

    پرسش پرینت از شیت پنهان

    سلام.

    من در ماکرو یک شیت رو پنهان کردم و میخوام در یک شیت دیگه براش کامند باتن پرینت بزارم. اما تا وقتی شیت چه با ماکرو چه دستی مخفی باشه دکمه کار نمی کنه و خطا میده. راهی نیست که شیت پنهان بمونه و پرینت کار کنه؟
    از دستور زیر برای مخفی کردن استفاده کردم:
    Sheet1.visible=xlsheetVeryHidden
    و از دستور زیر برای پرینت:
    Sheet1.printpreview
    برچسب ها: هیچ‌کدام
    • M_ExceL

      • 2018/04/23
      • 677
      #2
      نوشته اصلی توسط s.313
      سلام.

      من در ماکرو یک شیت رو پنهان کردم و میخوام در یک شیت دیگه براش کامند باتن پرینت بزارم. اما تا وقتی شیت چه با ماکرو چه دستی مخفی باشه دکمه کار نمی کنه و خطا میده. راهی نیست که شیت پنهان بمونه و پرینت کار کنه؟
      از دستور زیر برای مخفی کردن استفاده کردم:
      Sheet1.visible=xlsheetVeryHidden
      و از دستور زیر برای پرینت:
      Sheet1.printpreview
      سلام،
      برای این منظور از کد زیر استفاده کنید :
      کد:
      Sub PrintPreview()
Application.ScreenUpdating = False
With Sheets("sheet1")
    .Visible = xlSheetVisible
    .PrintPreview
    .Visible = xlSheetHidden
Application.ScreenUpdating = True
End With
End Sub
      به جای "sheet1" نام شیت خودتون رو درج کنید.
      [CENTER]Telegram Channel : [url]https://t.me/UltraOfficeSkills[/url]
      [/CENTER]

        کامنت

        • s.313

          • 2019/02/05
          • 70
          #3
          نوشته اصلی توسط M_ExceL
          سلام،
          برای این منظور از کد زیر استفاده کنید :
          کد:
          Sub PrintPreview()
Application.ScreenUpdating = False
With Sheets("sheet1")
    .Visible = xlSheetVisible
    .PrintPreview
    .Visible = xlSheetHidden
Application.ScreenUpdating = True
End With
End Sub
          به جای "sheet1" نام شیت خودتون رو درج کنید.
          ممنون از اینکه وقت گذاشتید اما قابلیت پرینت نداره وفقط نمایش میده

            کامنت

            • M_ExceL

              • 2018/04/23
              • 677
              #4
              نوشته اصلی توسط s.313
              ممنون از اینکه وقت گذاشتید اما قابلیت پرینت نداره وفقط نمایش میده
              خواهش میکنم،
              متوجه نشدم،
              منظورتون اینه که نمی تونید پرینت بگیرید ؟
              الان مشکلی بنده نمیبینم و میشه پرینت گرفت.
              [CENTER]Telegram Channel : [url]https://t.me/UltraOfficeSkills[/url]
              [/CENTER]

                کامنت

                • amirjjc

                  • 2017/05/06
                  • 23
                  #5
                  سلام از این کد استفاده کنید

                  کد PHP:
                  Sheet1.Visible = xlSheetVisible
                  Sheet1                  .Select
                  Me                  .Hide
                  Sheet1                  .PrintOut
                  Sheet1                  .Visible = xlSheetVeryHidden 

                    کامنت

                    • s.313

                      • 2019/02/05
                      • 70
                      #6
                      نوشته اصلی توسط M_ExceL
                      خواهش میکنم،
                      متوجه نشدم،
                      منظورتون اینه که نمی تونید پرینت بگیرید ؟
                      الان مشکلی بنده نمیبینم و میشه پرینت گرفت.
                      بله منظورم همین بود.روی سیستم من فقط نمایش میداد ولی پرینت نمیگرفت.
                      با کدی که آقای amirjjc فرستادن مشکلم حل شد.
                      ممنون. لطف کردید

                      - - - Updated - - -

                      نوشته اصلی توسط amirjjc
                      سلام از این کد استفاده کنید

                      کد PHP:
                      Sheet1.Visible = xlSheetVisible
                      Sheet1                      .Select
                      Me                      .Hide
                      Sheet1                      .PrintOut
                      Sheet1                      .Visible = xlSheetVeryHidden 
                      سلام. متشکرم. عالی بود

                        کامنت

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