VBAでユーザーにフォルダを指定させたい

　Win2000でEXCEL97を使ってます。
　ExcelVBAでダイアログボックスなどによりユーザーにフォルダを指定させたいのです。
　ファイルを指定させるには、GetOpenFileNameメソッドを使えば出来ることは分かったのですが、フォルダを指定させるような方法が分からないのです。
　本で読んだところでは、Excel2002ではFileDialogプロパティで可能なようなのですが、Excel97では出来ないようで…
　97でも可能な方法があればご教授下さい。
　よろしくお願いします。

No.7 回答者： 2ch 回答日時： 2003/06/25 10:29

>>VBSって何でしょうか？勉強できるような本はありませんか？

>たぶんＶＢＡでしょう。
VBScript
スクリプトざます。
この辺は、（迷惑でなければ）MSDNの検索上手なTodo36氏に召喚願いましょうｗ

OSにはイパーイDLLが用意されている。
アイコンであったり、関数であったり、様々。
shell32.dll は、Winの関数ライブラリの代表的なライブラリ。
この中にはシェル系の関数イパーイ。
言語を問わずして利用可能だが、逆にどの言語用にもなっていない。
んでVB用にこのAPIを直接呼ばないでもいいように、コントロール化したのが用意されている。
COMDLG32.DLLはコモンダイアログの関数群

>shell32.dllのヘルプってそもそもあるんですか？
シェル３２についてだけっていうのは、見たことないけど、その中の関数については、MSDNに出てるザマス。
ただ質問者はVBではなく、EXCEL.VBAみたいなので、どの方法を使うにしても、MSDNオンラインが必須になるのかな？
インストールしてあるVBAヘルプだけじゃ載ってないかもしれない。

「VisualStudioが入っていない」＆「Officeだけ入っている」という環境を持っていないので、質問者のローカルマシンで、どの程度の調べが可能かが掴めない状況。

No.6 回答者： kakusuke 回答日時： 2003/06/25 00:15

browseforfolderだと、

あくまでも
存在しているフォルダしか
使えないので
不便だと思って、
common dialogコントロールを
薦めたんですがねぇ。
ＭＳＤＮにヘルプもあったはずだし。

ちなみに
>１．VBSって何でしょうか？勉強できるような本はありませんか？
たぶんＶＢＡでしょう。

>２．shell.applicationって何でしょうか？
shell32.dll
というプログラムの
クラスオブジェクト（機能）
を使いますよ
という意味。

>３．browseforfolderをヘルプで調べても出てきませんが？
shell32.dllのヘルプってそもそもあるんですか？
２ｃｈさんなら知ってそう。

No.5 回答者： 2ch 回答日時： 2003/06/24 12:44

っていうか＃１・＃２は無視か

どっちかっていうと、そっちの方がいい。
スクリプトは最終手段として考えるべき。

No.4 回答者： 2ch 回答日時： 2003/06/24 12:39

スレ見ろ

参考URL：http://oshiete1.goo.ne.jp/kotaeru.php3?q=580219

No.3 回答者： GuruGuru22 回答日時： 2003/06/23 21:01

こんにちは。

VBS 使うとできます。
こんな感じ。

Dim sh As Object
Dim myFolder As Object

Set sh = CreateObject("shell.application")
Set myFolder = sh.browseforfolder(0, "フォルダを選択してください", 0)

Debug.Print myFolder.Items.Item.Path

この回答へのお礼

ありがとうございます。
うまくいきました。
申し訳ありませんが、質問があります。
超初心者ですみません。よろしくお願いします。

１．VBSって何でしょうか？勉強できるような本はありませんか？
２．shell.applicationって何でしょうか？
３．browseforfolderをヘルプで調べても出てきませんが？

お礼日時：2003/06/23 22:52

No.2 回答者： kakusuke 回答日時： 2003/06/23 01:11

COMDLG32.DLL

（systemフォルダもしくはsystem32フォルダにある。）
を参照設定して、
オブジェクト（コントロール）を
フォームに貼り付けて使えば
よろしいのではないでしょうか？

No.1 回答者： papayuka 回答日時： 2003/06/23 00:19

こんにちは。

WindowsAPIを使わないとダメだったと思います。

http://www14.big.or.jp/~kawamura/
↑こちらのサイトにある、flist.xls で実現されていたと思います。（ソースも見れたと思います）