사용자 지정 머리글로 인쇄

Question

문서를 만드는 매크로가 있으며 문서의 끝에 인쇄 특성을 매크로의 일부로 설정하려고합니다.

원하는 것은 모든 열을 한 페이지 (행 제외)에 맞추고 두 번째 페이지가 최상위 3 행을 인쇄 할 때 상위 3 행을 고정시키는 것입니다 (두 번째 페이지에도이 행이 표시됩니다). 부분과 함께 문제가).

내 코드 (아래)이 포함 된 세 가지 행 부분의 동결을 제외한 모든 (내가 생각하는 것)

With ActiveSheet.PageSetup 
.Orientation = xlLandscape 
.Zoom = False 
.FitToPagesWide = 1 
.FitToPagesTall = False 
End With 

Answer 1

는 다음과 같은 현재의 코드 사용에 추가

는이 작업을 수행하면 thwe은 당신이 요구하는 결과를 얻어야한다 :

페이지 레이아웃으로 이동 한 다음 시트 탭을 선택하고 행이 위에 반복되도록 설정합니다.

Answer 2

경우 기록 페이지 레이아웃 탭을 사용하여 Excel에서 매크로, 제목 인쇄 옵션을 사용하면 다음과 같은 코드를 얻을 수 있습니다.

With ActiveSheet.PageSetup 
    .PrintTitleRows = "$1:$3" 
    .PrintTitleColumns = "" 
End With 

두 코드 행을 현재 코드와 병합하십시오.

With ActiveSheet.PageSetup 
    .Orientation = xlLandscape 
    .Zoom = False 
    .FitToPagesWide = 1 
    .FitToPagesTall = False 
    .PrintTitleRows = "$1:$3" 
End With 

수동으로이해야합니까하기 :