[[20220421072233]]　『Application.Dialogsを使用してフォルダの指定とメx（老兵）　ページの最後に飛ぶ

『Application.Dialogsを使用してフォルダの指定とセルの値でのファイル名を入力したい。』（老兵）

お世話になります。

下記のようにApplication.Dialogsを使用してフォルダの指定やセルの値でファイル名を入力していたのですが、
それを同時に出来ないものでしょうか。

ネットワークに置いてあるフォルダを指定し、
A１に入力した値のファイル名が入力された状態で保存ダイアログを表示したいのです。

＆で繋げてみたり色々試したのですが、
どちらか一方だけが適用される状態です。

Application.Dialogs(xlDialogSaveAs).Show Arg1:=Range("A1").Value

Application.Dialogs(xlDialogSaveAs).Show Arg1:="\\***.local\"

Application.Dialogs(xlDialogSaveAs).Show Arg1:="\\***.local\" & Range("A1").Value

ご教授お願い致します。

＜使用 Excel：Excel2016、使用 OS：Windows10 ＞

ネットワーク上のフォルダをいったんカレントフォルダにしてから、
ファイルを指定すればいいでしょう。
（復帰が必要なら、いったん現在のフォルダを変数に保持してから）

前半部分は、下記を参照してください。
http://officetanaka.net/other/extra/tips15.htm

（γ） 2022/04/21(木) 07:55

（Y）さんありがとうございます。

URLを参考に無事に設定できました。
（老兵） 2022/04/23(土) 09:58

コメント返信：