【AccessVBA】フォルダを指定してインポート

私は現在、Accessでフォルダ内のExcelファイルを一括でインポートし集計するというツールを作成しております。


そこで質問ですが、フォルダ指定ダイアログを表示し、ダイアログで指定したフォルダ（中はxls,xlsx,xltmなど）をテーブル上にインポートするようなVBAはありますでしょうか？


まとめます。

・フォルダを選択するダイアログを表示したい
・一つのフォルダの中に、幾つものエクセルファイルが存在する
・ファイル名などはバラバラです
・シート単位でインポートしたいです
・インポートするシートを選択できるようにしたいです
・テーブルのカラムは決まっています


以上です。
どうか皆様のアドバイスよろしくお願い致します。

No.1 回答者： bin-chan 回答日時： 2013/08/13 13:25

「インポート対象シートを選択する」があるので、大きく２つに分けて考える。

６項目書かれているので、１～３まででブック別シート名一覧を作る。
対象にマークする工程を経て、４～６を実行。
前半は「フォルダ内のファイル名一覧作成」を、
後半は「指定したシートのインポート」のEXCELサンプルを探して下さい。

前半のファイル名一覧を、テーブルにすれば良いでしょう。