Excel VBAで複数シートを一括PDF化するコード【コピペOK】

Excelのロゴとロボットの手がPDF化をイメージさせるデザイン

【コピペOK】すべてのシートを一括でPDF保存するVBAコード|もう選ばなくてOK!

「PDFにしたいシート名を毎回指定するのが面倒…」

そんな方におすすめなのが、このすべてのシートを自動でPDF保存するマクロです!
作業時間を大幅に削減できて、コピペだけでOK。初心者でも安心して使えます。

✨ できること:すべてのシートを自動PDF保存!
  • ✅ シート名をいちいち指定しなくてOK
  • ✅ ブック内すべてのシートを1つのPDFにまとめる
  • ✅ デスクトップに自動保存される

📌 このコードをコピーして、Excelに貼り付ければすぐに実行可能です!


Sub ExportAllSheetsToPDF()
    Dim ws As Worksheet
    Dim savePath As String

    savePath = Environ("USERPROFILE") & "\Desktop\全シートまとめ.pdf"

    ThisWorkbook.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=savePath, _
        Quality:=xlQualityStandard

    MsgBox "すべてのシートをPDF保存しました!" & vbCrLf & vbCrLf & "保存場所:" & savePath, vbInformation
End Sub
  

VBAが初めての方はこちら

やさしいステップで学べる入門シリーズ第1回へ👇

【VBA入門①】VBAとは?マクロとの違いと始め方

✨ この記事は役に立ちましたか? ✨
よければ簡単なフィードバックをお願いします!

フィードバックを送る

この記事が「ちょっと便利かも」と思ったら、
ぜひ実務で使ってみてくださいね。
ご不明点やカスタマイズのご相談も、お気軽にどうぞ 😊

📩 もっとラクに業務を効率化したい方へ
VBAやRPA、クラウド会計のご相談もお気軽にどうぞ!

▶ お問い合わせフォームはこちら