• ベストアンサー

ExcelVBAでフォルダ内のブックをなめる

ExcelVBAだけで、指定したフォルダ内にあるランダムな名前のブックを 順次全件開いて、所定のセルのデータ(セル名・シート名は固定)を逐次 取得する方法って考えられますか? ブック名がある程度決まっていれば何とかなりそうなんですが、まったくの ランダムで、それも100件以上あるんです。 まあ、最後の最後は力技でブック名をハンドで書きだしますが・・・。

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

  • ベストアンサー
  • MackyNo1
  • ベストアンサー率53% (1521/2850)
回答No.3

開いたブックのセルのデータを最終的にどのように処理するのか例示されていませんが、以下のページに同じような質問が出されていますので、このコードを参考にしてご希望の処理に合わせてください。 http://okwave.jp/qa/q4812132.html

FEX2053
質問者

お礼

こちらのURL先のコードで行けるような感じです。具体的な例示、ありがとうございました。

その他の回答 (2)

回答No.2

http://nienie.com/~masapico/api_FindFirstFile.html に、フォルダ内のファイルを検索するVBのプログラムが載っています。 この例では「*.*」になっているので「*.xls」にすれは、フォルダ内の全ブックの「ファイル名」を拾えます。 ファイル名を拾えれば、そのファイルを開いて、特定のセルのデータを取り出すのは簡単です。

FEX2053
質問者

お礼

コードを読んでみましたが、そこまで頑張らなくても他の方の言われたDir関数で何とかなりそうです。でも、わざわざ探して頂いて、ありがとうございました。

  • web2525
  • ベストアンサー率42% (1219/2850)
回答No.1

http://officetanaka.net/excel/vba/file/file07.htm Dir関数で順次読み出せば、できるんじゃないでしょうか

FEX2053
質問者

お礼

なるほど。これで行けそうですね。 回答ありがとうございました。

関連するQ&A