Officeライブラリー:SampleFile159Accessを使っていて、下記のようなファイルを選択できるようなダイアログを呼び出したいと思うことは、Accessに慣れてくれば来るほど高まる要求です。利用ですからややっこしいのが難点でした。今度登場したAccess2002では、ちょっとした操作でこれを実現させることができます。Access2002に付属するものではなくて、Office2002に付属するのが正確ですけど、兎に角便利になりました。以下、順を追ってその方法をご紹介します。※Access2002、2003専属の運用です。残念ながら、Access2000以下では利用できませんのでご承知ください。下記の関連ページを参照して下さい。Access2002を立ち上げ、VBE画面を呼び出します。Editor」を選択します。すると、VBEを記述するよく観る画面が現れますね。これがVBE画面です。次に、ツールバーに目を向けて下さい。「ツール」から「参照設定」を選択しクリックします。下記のように、ずらっとライブラリファイルが並んでますね。Library」がチェック済みになっていないと思いますから、スクロールバーを下げてチェックして下さい。これで下準備OKです。このライブラリーにチェック済みをしていないと、エラーになりますのでご注意ください。Library」が存在します。新規のAccessを立ち上げてモジュールに下記のFunctionプロシージャを記述します。'エラー処理ルーチンを実行します。&quot;Access2002、2003でないため、この機能を利用できません。'Accessのバージョンを調べます。'Access2000は10.0、Access2000は9.0,Access97は8.0,Access95は7.0を返します。'ファイル参照用の設定値をセットします。'ファイルの種類を定義します。'複数ファイル選択を可能にする場合はTrue、不可の場合はFalse。'最初に開くホルダーを当ファイルのフォルダーとします。今回のサンプルは、フォーム上のテキストボックス(非連結)にコマンドボタンを押してPC内部のファイルを選択し、パスを代入するものです。コマンドボタンの「クリック時イベント」には下記のプロシージャを記述しています。呼び出し、その値をテキストボックスに代入します。SysCmd関数を組み込んで関数の戻り値(Access2002なら10.0)によってプロシージャの進行を制御しています。