Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

72861 / 76732

←次へ　｜　前へ→


	【8353】FileDialogについて

ふちこま - 03/10/10(金) 9:58 -


	引用なし

	パスワード

はじめまして。
今回初めて質問をさせていただきます。

ＶＢＡで組み込みの「ファイルを開く」ダイアログボックスを
使用したいのですが、下記のようにコードを書いてみました。

-------------------------------------------------------------------
Dim OpenFileDialog As FileDialog
Dim blnRef As Boolean

Set OpenFileDialog = Application.FileDialog(msoFileDialogOpen)

With OpenFileDialog
　　.AllowMultiSelect = False
　　.ButtonName = "指定する"
　　.Filters.Clear
　　.Filters.Add "Tar ファイル", "*.gz; *.tar"
　　.Title = "情報アーカイブの指定"
　　.Show
End With
-------------------------------------------------------------------

使用できることはできるのですが、「一つ上のフォルダへ移動」ボタンや
左側にあるショートカットタブが使用できません。
表示されているのにクリックしても反応しないのです。

自分なりに調べたのですが、ＶＢＡ初心者でどうにも分かりません。
どうすれば使用できるの教えてください。

環境は、
[Windows XP Pro SP1]
[IE6 SP1　　　　　 ]
[MS OFFICE 2002 SP2]
です。

0 hits

▼

【8353】FileDialogについて ふちこま 03/10/10(金) 9:58

≪