인쇄 탭에서 '모든 열을 한 페이지에 맞춤'을 설정하는 방법

인쇄 탭에서 '모든 열을 한 페이지에 맞춤'을 설정하는 방법

단, 사용자가 Excel에서 Print 탭을 열 때 항상 'Fit all columns on one page'를 설정하는 것이 좋습니다.

그리고 그들은 스스로 그것을 하기를 원하지 않는다.깜짝이야 :)

다음은 Excel 2013에서의 위치 스크린샷입니다.

다음과 같은 VBA 코드를 찾으려고 했지만 성공하지 못했습니다.

With Sheets("Print Letter").PageSetup .FitToPagesWide = 1 .FitToPagesTall = 1 End With

의 설정을 시도합니다..FitToPagesTall로.False수동으로 설정할 수 있다.FitToPagesWide소유물.

MSDN 링크

이 속성이 False인 경우 Microsoft Excel은 FitToPages에 따라 워크시트의 크기를 조정합니다.넓은 재산.Zoom 속성이 True인 경우 FitToPagesTall 속성은 무시됩니다.

Sub PrintColumns()
    Application.PrintCommunication = False
    With Sheets("Print Letter").PageSetup
        .FitToPagesWide = 1
        .FitToPagesTall = False
    End With
    Application.PrintCommunication = True
End Sub

언급URL : https://stackoverflow.com/questions/25741049/how-to-set-fit-all-columns-on-one-page-in-print-tab