Excelワークシートの範囲をPDFにエクスポートするエラー

Question

セル範囲の選択をPDFにエクスポートするスクリプトを作成しようとしています。 私が書いたコードは以下の通りです：「実行時エラー 『1004』：私は読み込みエラーとポップアップメッセージを取得するスクリプトを実行

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：\ Users \ユーザーtest.pdfという
2. C：マイユーザー名 \ test.pdfという\ \ユーザー

を

最初に遭遇したのと同じエラーが発生しました。 2番目は働いた。

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