Martin은 동시에 여러 워크 시트의 인쇄 범위를 설정할 수있는 방법이 있는지 물었습니다. 그는 똑같은 구조로 구성된 여러 워크 시트가 포함 된 통합 문서를 가지고 있으며 각각의 인쇄 범위가 똑같기를 원합니다.

Martin이 발견했듯이 Excel에서 직접이 작업을 수행 할 수있는 방법은 없습니다.

여러 워크 시트를 선택하고 인쇄 영역으로 설정할 영역을 선택한 다음 인쇄 영역을 설정하려고하면 설정을 수행하는 옵션이 회색으로 표시되어 해당 옵션을 선택할 수 없다는 것을 금방 알 수 있습니다.

그러나 시도 할 수있는 몇 가지 방법이 있습니다. 하나는 새 통합 문서로 시작하여 모든 워크 시트에서 원하는대로 인쇄 영역이 포함 된 단일 워크 시트를 개발하는 것입니다. 그런 다음 워크 북에서 원하는만큼 워크 시트를 복사합니다. 복사 된 워크 시트에는 첫 번째 워크 시트에서와 마찬가지로 인쇄 영역이 설정됩니다.

다른 옵션은 인쇄 영역 설정을 수행 할 매크로를 만드는 것입니다. 선택한 모든 워크 시트의 인쇄 영역을 활성 워크 시트의 인쇄 영역으로 설정하는 다음 매크로를 고려하십시오. (두 개 이상의 워크 시트를 선택한 경우 활성 워크 시트는 매크로를 실행할 때 표시되는 워크 시트입니다.)

Sub SetPrintAreas1()

Dim sPrintArea As String     Dim wks As Worksheet

sPrintArea = ActiveSheet.PageSetup.PrintArea     For Each wks In ActiveWindow.SelectedSheets         wks.PageSetup.PrintArea = sPrintArea     Next     Set wks = Nothing End Sub

먼저 활성 워크 시트에서 인쇄 영역을 설정하지 않고 지정한 범위로 인쇄 영역을 설정하려는 경우 인쇄 영역의 범위를 사용하도록 매크로를 약간 변경할 수 있습니다. :

Sub SetPrintAreas2()

Dim sPrintArea As String     Dim wks As Worksheet

sPrintArea = "A7:E22"

For Each wks In ActiveWindow.SelectedSheets         wks.PageSetup.PrintArea = sPrintArea     Next     Set wks = Nothing End Sub

필요에 따라 다른 인쇄 영역을 선택하려면 sPrintArea 변수에 지정된 범위를 바꾸십시오. 여러 다른 통합 문서에서 매크로를 상당히 많이 사용할 수 있다고 생각하거나 인쇄 영역을 정기적으로 변경해야 할 수도 있다고 생각하는 경우 사용자에게 범위를 입력하라는 메시지가 표시되도록 매크로를 변경할 수 있습니다. 사용 :

Sub SetPrintAreas3()

Dim sPrintArea As String     Dim wks As Worksheet

sPrintArea = InputBox("Enter print area range")

For Each wks In ActiveWindow.SelectedSheets         wks.PageSetup.PrintArea = sPrintArea     Next     Set wks = Nothing End Sub

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (3157)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다. 여기에서 Excel (Excel 2007 이상)의 리본 인터페이스에 대한이 팁의 버전을 찾을 수 있습니다.

link : / excelribbon-Setting_Print_Ranges_for_Multiple_Worksheets [여러 워크 시트의 인쇄 범위 설정].