マクロで実現可能!
参考:https://www.ymbtax-blog.com/to-pdf-from-excel-worksheet/
事前準備
・ツールバーの「開発」をクリック(「開発」タブがない場合は上記参考サイトを参照願います)
・「マクロのセキュリティ」→「警告を表示してすべてのマクロを無効にする」をON
・[Alt]+[F11]を押してVBEを起動
・「ツール」→「オプション」→ [編集]タブで、「自動構文チェック=OFF」「変数の宣言を強制する=ON」
VBEで編集
・[Alt]+[F11]を押してVBEを起動
・[Alt]+[I][M]を押してエディタを起動(モジュール作成)
・ワークシート別にPDF変換するスクリプト(下記)を記載し保存
Sub ワークシートごとにPDFに変換()
Dim i As Long
For i = 1 To Worksheets.Count
Worksheets(i).ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ThisWorkbook.Path & "\" & _
Worksheets(i).Name, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
Next i
End Sub
マクロの起動(PDF作成)
・「開発」→「マクロ」→「 ワークシートごとにPDFに変換」を「実行」
→ Excelファイルと同じフォルダに、「シート名.pdf」ファイルが作成される!
ホームページ制作のこと、ホームページの運営でわからないことや困っていることがありましたら、「株式会社アットライズ」までお気軽にご相談ください。
株式会社アットライズのホームページはこちら
すごい!
簡単にシート別にPDF変換できました!
ありがとうございました( ;∀;)