【エクセルマクロ】PDF出力ファイル名「ブック名＆シート名」で保存

エクセルマクロで、PDF出力時のファイル名を「ブック名とシート名」にするVBAコードをご紹介します。

このページのマクロコードは、コピペで使えます。
ぜひお試しください！

PDF出力ファイル名「ブック名とシート名」

以下のマクロを実行すると、PDFのファイル名を「ファイル名＆シート名」で保存します。

Sub PDF出力時にファイル名をブック名とシート名から取得()

Dim TargetSht As String
Dim FileName As String
Dim FSO As Object

    'ファイルを操作するオブジェクト
    Set FSO = CreateObject("Scripting.FileSystemObject")
    
    'ファイル名取得（拡張子なし）
    FileName = FSO.GetBaseName(ActiveWorkbook.Name)

    'PDFで出力したいシート名
    TargetSht = "リスト2"
    
    'PDF保存
    Sheets(TargetSht).ExportAsFixedFormat Type:=xlTypePDF, _
    FileName:=ActiveWorkbook.Path & "\" & FileName & "-" & TargetSht & ".pdf"

End Sub

マクロ実行前

ファイル名「会議資料」と、シート名「リスト2」を取得して、

PDF出力時のファイル名に利用します。

マクロ実行後

PDFのファイル名を「会議資料-リスト2.pdf」で保存できました。

 
 
この記事がお役に立ちますと幸いです。
 
・【エクセルマクロ】PDF処理を自動化する使用例まとめ
 

【エクセルマクロ】PDF処理を自動化：超便利１4選

エクセルマクロで、PDF処理を自動化するVBAコードをご紹介します。どのマクロコードも、コピペで使用できます。ぜひお試しください！

kirinote.com

2023.02.05