Excel 워크 시트 범위를 PDF로 내보내기 오류

Question

셀 범위 선택을 PDF로 내보내는 스크립트를 작성하려고합니다. "런타임 오류 '1004': I 스크립트를 실행

Sub ExporttoPDF() 

With Sheets("Results").Range("B10:J100") 
    .ExportAsFixedFormat _ 
    Type:=xlTypePDF, _ 
    Filename:="C:\Users\Export.pdf", _ 
    Quality:=xlQualityStandard, _ 
    IncludeDocProperties:=True, _ 
    IgnorePrintAreas:=False, _ 
    OpenAfterPublish:=True 
End With 

End Sub 

매번 내가라는 오류와 함께 팝업 메시지가 나타납니다. 문서 저장되지를 문서 내가 쓴 코드는 다음과 같다 열려 있거나 저장 중에 오류가 발생할 수 있습니다. "

나는 온라인으로 조사하고 해결책을 찾으려고했지만 할 수 없었습니다. 내가 뭘 잘못하고 있는지 알 겠어? 감사합니다.

Answer 1

가장 명확한 오류 메시지가 아닙니다. 가장 큰 원인은 C:\Users 폴더에 대한 쓰기 권한이 있다는 것입니다. 이는 일반적으로 관리자 계정으로 제한됩니다.

1. C : 사용자 \ \있는 test.pdf
2. C :
   는 내가 아닌 관리자 계정을 사용하여 다음과 같은 테스트있는 test.pdf \ 내-이름 \ \ 사용자를

첫 번째 오류는 동일한 오류가 발생했습니다. 두 번째 작업.

Answer 2

Excel과 관련이 있다고 생각하나요? 나는 여전히 찾고 있지만 경로를 변경하여 작동하도록 할 수있었습니다.

Sub ExporttoPDF() 

With Sheets("Results").Range("B10:J100") 
    .ExportAsFixedFormat _ 
    Type:=xlTypePDF, _ 
    Filename:="C:\Users\tjb1\Desktop\Export.pdf", _ 
    Quality:=xlQualityStandard, _ 
    IncludeDocProperties:=True, _ 
    IgnorePrintAreas:=False, _ 
    OpenAfterPublish:=True 
End With 

End Sub