excel - PDFに印刷するには？

Question

ExcelからPDFに印刷するために次のソリューションを試しました：

Excel 2013 VBAでPDFに出力

それは生産します

実行時エラー 1004

オンwb.ExportAsFixedFormat。

私の Excel のバージョン: 2007.

デスクトップに保存されるようにファイルパスを変更しました。

Sub Invoice_to_PFD()
    'Saves the invoice print area to a PDF file
    
    Dim fp As String
    Dim wb As Workbook
    
    fp = "C:\desktop\NewInvoice.pdf"
    Set wb = ActiveWorkbook
    
    wb.ExportAsFixedFormat Type:=xlTypePDF, Filename:=fp, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
    
End Sub

Answer 1

このエラーの別の原因は、ファイル名に次のような不正な文字が含まれている場合です。

• < (未満)
• > (より大きい)
• : (コロン)
• " (二重引用符)
• / (スラッシュ)
• \ (バックスラッシュ)
• | | (縦棒またはパイプ)
• ? （疑問符）
• * (アスタリスク)

ここで「命名規則」を参照してください: https://docs.microsoft.com/en-us/windows/desktop/fileio/naming-a-file

解決策:無効な文字を「_」などの有効な文字に置き換えます。

Answer 2

エクスポートするワークシートにデータが含まれていない場合、エクスポートは失敗します。MrExcel フォーラムでこの解決策を見つけました。誰かが答えにつまずいたようです!