よねさんのWordとExcelの小部屋　なんでも掲示板 [One Message View / Re[1]: マクロで印刷設定]

よねさんのWordとExcelの小部屋　なんでも掲示板

■13579 / 1階層)

　マクロで印刷設定

□投稿者/ よねさん -(2022/05/13(Fri) 13:35:35)

「エクセル内の名前で」が何のことかわからないのですが、
このVBAを動かしているエクセルファイルの名前のことだとして、
拡張子が　.xlsm　であるなら、Replace関数で　.pdf　に置き換えればよいのでは?
　Replace(ThisWorkbook.Name, ".xlsm", ".pdf")
　
ファイル名の部分を　以下のような感じで書き換えたらどうでしょうか?
ファイルのパスにファイル名をつなげると↓のようになるのかな?

Filename:="C:\Users\2600901906\Desktop\katayama\\" & Replace(ThisWorkbook.Name, ".xlsm", ".pdf")

記事引用 削除キー/

上記関連ツリー
前の記事(元になった記事)	次の記事(この記事の返信)
←マクロで印刷設定 /sora	→Re[2]: マクロで印刷設定 /よねさん
マクロで印刷設定 / sora (22/05/13(Fri) 10:16) #13578
`└` マクロで印刷設定 / よねさん (22/05/13(Fri) 13:35) #13579 ←Now
`└` Re[2]: マクロで印刷設定 / よねさん (22/05/13(Fri) 16:45) #13580
上記ツリーを一括表示 / 上記ツリーをトピック表示
上記の記事へ返信

入力内容にタグは利用可能です。

他人を中傷する記事は管理者の判断で予告無く削除されます。
半角カナは使用しないでください。文字化けの原因になります。
名前、コメントは必須記入項目です。記入漏れはエラーになります。
メールアドレスには自動でNo-の文字が挿入されます。メール収集対策。
入力内容の一部は、次回投稿時の手間を省くためブラウザに記録されます。
削除キーを覚えておくと、自分の記事の編集・削除ができます。
URLは自動的にリンクされます。
記事中に No*** のように書くとその記事にリンクされます(No は半角英字/*** は半角数字)。
- No123 → 記事No123の記事リンクになります(指定表示)。
- No123,130,134 → 記事No123/130/134 の記事リンクになります(複数表示)。
- No123-130 → 記事No123～130 の記事リンクになります(連続表示)。

Name	/
E-Mail	/
Title	/
URL	/
Comment/ 通常モード->　図表モード-> (適当に改行して下さい/半角10000文字以内)
削除キー	/ (半角8文字以内)
ガード用キー(必須)	/ 1357と半角で入力
プレビュー/

HOME HELP 新規作成新着記事ツリー表示トピック表示検索過去ログ

- Child Tree -