【エクセルマクロ】PDF出力ファイル名「ブック名とシート名」:コピペで使えるコード

vba-PDFブック名とシート名保存-アイキャッチ ExcelVBA

エクセルマクロで、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」を取得して、

ファイル名に利用します。


 

マクロ実行後

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


 
 
この記事がお役に立ちますと幸いです。
 

【エクセルマクロ】PDF処理を自動化:超便利14選
...

 

「プログラマーの本気がExcelを覚醒させる 超絶ExcelVBA」
ExcelVBAでワンランクアップできる書籍
具体的で応用が利く技をたくさん掲載