VBA PDFを同じフォルダに保存する

質問

EXCELの差し込み印刷でPDFファイルを出力する方法
https://excel.kuuneruch.com/sasikomi-pdf-select/

保存場所を同じフォルダに保存したいのですが、どうしたらよいでしょうか？

'⑥ひな形シートでPDFを作成する（作成PDFファイル名を指定する）
Call CreatePdfFile("D:\100_PDF\" & .Range("A" & nowRow) & ".pdf")

回答No.1

kkkkkm · ベストアンサー

マクロを実行しているブックと同じフォルダという事でしたら
ThisWorkbook.Path & "\" & .Range("A" & nowRow) & ".pdf"
にして試してみてください。

補足

返答ありがとうございます。

Call CreatePdfFile(ThisWorkbook.Path & "\" & .Range("A" & nowRow) & ".pdf")

中断モードでコードを実行することはできませんとエラーメッセージが出ます。
どこが違うのでしょうか？

回答No.2

kkkkkm

「中断モードでコードを実行できません」と出た時の対処方法
http://www.start-macro.com/55/w/s085.html

こちらを参照してください

お礼

おかげさまでできました。
ありがとうございました。