どの名前のcsvでも、マクロで取り込めるようにしたい。

質問

Excel2000のVBAで作成しております。

csvファイルからデータを取り込み、セットするマクロを作りたいのですが、
マクロファイルオープン時に選択するcsvファイルを、
その後のデータ抽出作業工程で対象にする時には、
どのように書けば良いのでしょうか？
Workbooks("*.csv").Activateと書いてもエラーになってしまいました。

例えば
Workbooks("オケーウェブ.csv").Activateと書けば
オケーウェブ.csvをActivateに出来ることは分かったのですが、
その時によって、
オケーウェブ.csv
ABC.csv
報告書.csvなどと、選択するcsvファイル名が異なります。

マクロファイルオープン時の一番最初に選択したcsvファイルをActivateにするには、
どのように書けば良いのでしょうか？

どなたかご教授をお願いいたします。

回答No.1

merlionXX · ベストアンサー

csvを開いたときにはアクティブになっているのでしょうから
Set wb = ActiveWorkbook
のような感じで変数にとりこんでおけばいいのでは？

そしたらアクティブじゃなくなったあとからでも
wb.Activate
でまたアクティブにできますが。