【コピペ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
PDFを一括で開きたい
VBAが初めての方はこちら
やさしいステップで学べる入門シリーズ第1回へ👇
✨ この記事は役に立ちましたか? ✨
よければ簡単なフィードバックをお願いします!
この記事が「ちょっと便利かも」と思ったら、
ぜひ実務で使ってみてくださいね。
ご不明点やカスタマイズのご相談も、お気軽にどうぞ 😊