こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

EXCELで全ての拡張子のファイルを表示するダイヤログ

EXCEL2002(OS Win XP)を指定しています。
処理の途中でユーザーにファイルを指定させる部分に

Application.Dialogs(xlDialogOpen).Show

を使用しています。
しかし、これだけですとエクセルのファイルしか表示されません。
ユーザーが画面の下の方で「ファイルの種類」を変更しなくても最初から全ての種類のファイルが表示されるようにしたいのですが、どのようにしたらよいでしょうか?

投稿日時 - 2004-02-06 02:57:12

QNo.771558

困ってます

質問者が選んだベストアンサー

Application.Dialogs(xlDialogOpen).Show("*.*")

投稿日時 - 2004-02-06 04:20:15

お礼

こんな簡単にできてしまうのですね。
Application.Dialogs(xlDialogOpen).Show(*.*)
↑までは思いついたのですが、""が足りませんでした。
どうもありがとうございました。

投稿日時 - 2004-02-06 06:46:57

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(2)

ANo.2

Sub test01()
Dim x As Boolean
x = Application.Dialogs(xlDialogOpen).Show(arg1:="*.*")
End Sub

http://tllsp.web.infoseek.co.jp/contents/tips/tips_file_io_.htm

投稿日時 - 2004-02-06 06:40:17

お礼

詳しいご説明ありがとうございました。
すみませんが、ポイントはご回答いただきました順番につけさせていただきます。

投稿日時 - 2004-02-06 06:48:47

あなたにオススメの質問