런타임 오류 : 5, 잘못된 프로 시저 호출 또는 인수

Question

나는 아래 PDF로 수출 시트 템플릿을 매크로를 만들었습니다

ActiveWorkbook.Sheets("Sheet2").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ 
ActiveWorkbook.Path & "\Survey Report.pdf", _ 
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _ 
:=False, OpenAfterPublish:=True 

&

는 구글이 다른 방법으로 많은 제안합니다으로 시도했다. 그러나 그것은 오류에 아무런 차이가 없습니다. 이미 시도

링크 :

1. http://www.mrexcel.com/forum/excel-questions/608810-printing-multiple-worksheets-pdf-2.html
2. http://www.mrexcel.com/forum/microsoft-access/385749-exportasfixedformat-error.html
3. http://answers.microsoft.com/en-us/office/forum/office_2010-customize/error-5-invalid-procedure-call-or-argument/574c2c8f-7f2c-4644-9373-bbc14c8d3fd7?msgId=4dbee3f3-ad28-4427-a50b-a3904b09ec1e

이 도와주세요.

Answer 1

실제 코드가 저에게 효과적입니다.

1. 는 또한 다른 인쇄 빈 시트가 당신에게 오류를 줄 것이다에 Sheet2 무언가를 가지고 희망 : 그러나 주 (이 시도하고 테스트)

   Sub Sample() 
       ActiveWorkbook.Sheets("Sheet2").Activate 
   
       ActiveSheet.ExportAsFixedFormat _ 
       Type:=xlTypePDF, _ 
       Filename:=ActiveWorkbook.Path & "\Survey Report.pdf", _ 
       Quality:=xlQualityStandard, _ 
       IncludeDocProperties:=True, _ 
       IgnorePrintAreas:=False, _ 
       OpenAfterPublish:=True 
   End Sub 
   

   이 시도. 당신은 어도비 프린터가 설치되어있는 경우

2. 당신이 다음 ThisWorkbook-ActiveWorkbook을 변경하고 다시 시도 할 수있는 코드를 실행하는 통합 문서에서 시트를 인쇄 할 경우
...

Answer 2

다음 바로 아래 사용 pdf를 얻을 코드

sub Sample() 
    ActiveWorkbook.Sheets("Sheet2").Activate 
    ActiveSheet.Printout 
End Sub 

Answer 3

또한 Excel의 무료 Microsoft Save as PDF or XPS add-in이 설치되어 있어야합니다.