ファイル保存時にネットワーク上のフォルダを表示するダイアログを表示するには
どのように記述すればよろしでしょうか。ご教授よろしくお願い致します。
以下、教えていただいたコードですが
Const PathName = "\\●●\○○\"
Call SetCurrentDirectory(PathName)
Application.Dialogs(xlDialogSaveAs).Show
このコードでファイルを開くダイアログを記述すると
設定したネットワーク上のフォルダを表示するのですが
Application.Dialogs(xlDialogOpen).Show ---OK
ファイル保存のダイアログを記述すると
では、デスクトップがダイアログに表示されます。
Application.Dialogs(xlDialogSaveAs).Show ---NG
Application.Dialogs(xlDialogSaveAs).Show の場合(保存ダイアログ表示)は
どのように記述すれば、ネットワーク上のフォルダを表示できますでしょうか。
よろしくお願い致します。
No.2ベストアンサー
- 回答日時:
> 以下、教えていただいたコードですが
知恵袋なんですかね。
http://detail.chiebukuro.yahoo.co.jp/qa/question …
もともとカレントフォルダなど操作するのではなく、
http://support.microsoft.com/kb/139723/ja
第1引数にパスを指定する方法を使う方がいいのではないかと思いますが、
同じ動作をしてしまいますね。
この時点で、Dialogs(xlDialogSaveAs) では難しいでしょう。
ネットワークドライブにするか、#1さんのおっしゃるように
API のコモンダイアログを使う事を考えた方がいいと思います。
使い方がわからず御礼が遅くなり、大変申し訳ございません。
皆さんの回答を頂き、色々試してみた結果
何とか解決にこぎつけました。
ありがとうございました。
またよろしく御願い致します。
No.1
- 回答日時:
SetCurrentDirectory は API を使ってるんでしょうかね。
個人的には Application.Dialogs じゃなくて Application.GetOpenFilename や Application.GetSaveAsFilename のダイアログを使う方が好きですけどね。
これならきちんと UNC パスになってくれると思います。
Dialogs(xlDialogSaveAs) や Dialogs(xlDialogOpen) は Excel で対応しているファイル形式だけを取り扱う事しかできないけれど、GetOpenFilename や GetSaveAsFilename はダイアログの機能だけを提供してくれるので、開いたり保存したりも自分のコードでコントロールできます。
使い方がわからず御礼が遅くなり、大変申し訳ございません。
皆さんの回答を頂き、色々試してみた結果
何とか解決にこぎつけました。
ありがとうございました。
またよろしく御願い致します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/06 17:46
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- その他(Microsoft Office) ワードのマクロについて教えてください。 1 2023/01/21 16:01
- Visual Basic(VBA) シートをコピーする下記記述でダイアログを用いた記述がわかりません?( A = Dir(ThisWor 4 2022/08/22 12:26
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/03/28 14:52
- Visual Basic(VBA) 動かなくなってしまった古いVBAを動くようにしたい 8 2022/09/20 13:57
- Excel(エクセル) Excelのマクロコードについて教えてください。 1 2022/03/27 10:47
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2022/03/31 12:46
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
ExcelのVBAでフォルダ指定がで...
-
【マクロ】ファイル名の日付に...
-
デスクトップの画像をhtmlに表...
-
ファイル名と同名のフォルダを...
-
VBA 最新のフォルダ取得
-
フォルダ内のPDFファイル名を変...
-
Excel VBA で フォルダ名の一部...
-
バッチファイルで指定フォルダ...
-
EXCELのセルにフォルダのパスの...
-
[VB.net 2003] FileDialogでデ...
-
VBS サブフォルダの再帰処理に...
-
ファイル名から該当フォルダへ移動
-
フォルダを開いて、閉じるのプ...
-
VS2005で"定義へ移動"ができません
-
エクセル マクロで指定フォル...
-
マクロでネットワークドライブ...
-
DLLの暗黙リンクの調べ方
-
30日前を残して過去の日付フォ...
-
ACCESS VBAからのファイル削除
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
VBA 最新のフォルダ取得
-
バッチファイルが保存されてい...
-
ファイル名と同名のフォルダを...
-
【マクロ】ファイル名の日付に...
-
VBA フォルダ名に特定の文字を...
-
デスクトップの画像をhtmlに表...
-
フォルダ内のPDFファイル名を変...
-
ディレクトリ名変更してコピー...
-
多量のファイルをフォルダに自...
-
Excelで指定したフォルダに保存...
-
Access VBA で フォルダ権限...
-
C ファイル出力で、フォルダが...
-
Excelのハイパーリンクについて...
-
あるフォルダーのファイルを違...
-
パス名に2バイト文字(マルチバ...
-
同一フォルダ内の別ブックから...
-
エクセルのマクロについて教え...
-
バッチファイルで指定フォルダ...
-
ExcelのVBAでフォルダ指定がで...
おすすめ情報