2014-01-21 2 views
0

다음 코드를 사용하여 여러 시트의 페이지를 인쇄합니다. 나는 "PDF로 인쇄"프린터를 사용하여 데이터를 PDF로 가져올 수 있음을 알고 있습니다. 그러나 인쇄 할 때 Excel 문서의 일부 측면이 너무 좋아지지 않습니다. 그러나 PDF로 저장하면 문서가 꽤 아름답게됩니다. 그래서 PDF 형식의 시트를 선택하여 다양한 범위의 페이지를 저장할 수있는 방법이 있는지 궁금합니다.일부 Excel 시트의 일부 페이지를 PDF로 저장

If IsEmpty(Cells(i, "C").Value) Then 'Printa alla sidor 
    Call Sheets(Cells(i, "A").Value).PrintOut 
ElseIf Cells(i, "C").Value = 0 Then 'Printa fram till viss sida 
    Call Sheets(Cells(i, "A").Value).PrintOut(1, 1) 
ElseIf Cells(i, "C").Value > 0 Then 'Printa fram till viss sida 
    Call Sheets(Cells(i, "A").Value).PrintOut(1, Cells(i, "C").Value) 
End If 

답변

3

예, THIS MSDN information에 따라 .ExportAsFixedFormat method 사용할 수있는 가능성이있다. 선택 범위는 PDF 파일로 내보낼

Selection.ExportAsFixedFormat xlTypePDF, "testFile.pdf" 

가 'TestFile.pdf'

내가 내보낼 수라고 :

이 방법을 사용하는 방법의 가장 간단한 예는 코드의 다음 라인을 제시 동일한 PDF 파일을 여러 번 선택할 수 있습니까?

예, 가능합니다. 이 옵션을 사용할 수 있습니다

  1. 각각의 새로운 페이지를 만들 것입니다 하나 개의 시트 - 사용 Union() 일부 비 연속 범위를 내보내려면 내부 범위 :

    Union(Range("A1:f10"), Range("A15:d15")).ExportAsFixedFormat _ 
        xlTypePDF, "testFile.pdf" 
    
  2. 다른 시트에서 범위를 내보낼 - .ExportAsFixedFormatWorkbook method으로 사용하면 전체 통합 문서의 각 인쇄 영역을 하나의 PDF 문서로 내보낼 수 있습니다. 그것은이 방법으로 진행됩니다 페이지를 제한하는 .ExportAsFixedFormat method의 두 번째 아이디어 체크 추가 매개 변수에 대한

    ActiveWorkbook.ExportAsFixedFormat xlTypePDF, "testFile2.pdf" 
    

인쇄 할 수 있습니다.

+0

여러 PDF 파일을 동일한 PDF 파일로 내보낼 수 있습니까? 시트 "A"의 페이지 1-2와 시트 "B"의 모든 페이지를 내보내려고한다고 가정 해보십시오. – user1283776

+0

그게 좋은 질문입니다 ... 내가 생각하고 그것을 확인하자 :) –

+0

내 대답에 두 가지 추가 옵션을 참조하십시오. –

관련 문제