2008-10-22 5 views
2

특정 통합 문서를 새 통합 문서로 복사 한 다음 해당 통합 문서를 저장하고 닫는 매크로가 포함 된 Excel 2003 통합 문서가 있습니다. 매번 약간 다른 시트 선택으로이 작업을 수십 번합니다.VBA를 통해 MS Excel 2003 통합 문서를 Excel로 내보내기

보조 통합 문서의 스프레드 시트를 PDF로 내보내는 매크로에 추가 단계를 추가하고 싶습니다. 이 작업을 수행하는 확실한 방법은 PDF 프린터와 Excel의 인쇄 기능을 사용하는 것이지만 대부분의 PDF 프린터는 완료하기 전에 "다른 이름으로 저장 ..."대화 상자를 제공합니다. 분명히, 70 번 홀의 경우에 개별적으로 이것을 타이프하는 것은 호소력이 부족합니다 - 그래서 나는 미리 (아마도 "인쇄중인 파일의 파일 이름을 사용하여 확장자를 뺀 것을 사용합니다") 미리 설정할 수있는 것을 원합니다. 기본 옵션.

무료 PDF 프린터에 대한 아이디어가 있습니까? 또는 적절한 대안?

답변

4

사무실 "대화로 저장을 우회하는 세 가지 자동 이름 옵션"입니다. 내가 PDFCreator 좋은 것으로 나타났습니다, VBA가 샘플 파일에 포함되어 있으며, 그 CutePDF도 좋은 들었습니다. PDFCreator와 CutePDF는 무료입니다.

2

대답은 Remou에서 (현명한) 답변으로 개발되었으며, 이것이 내 문제에도 너무 도움이 되었기 때문입니다.

나는 pdfcreator 선택 (I 이미 설치했기 때문에) 이것은 내가 사용 결국 무엇을 :

Sub PDF_Print() 
    Dim p 
    p = ActivePrinter 
    ActivePrinter = "PDFCreator" 
    ActiveDocument.PrintOut 
    ActivePrinter = p 
End Sub 

작품을 마법처럼