関連の質問です。VBのあるエクセルと同じフォルダ内を表示するのはどうしたらいいのでしょうか? 同じフォルダ内にあるCSVファイルを読み込んで処理をするの、デスクトップなどダイアログにでてくるとうっとうしいのです。
http://www.ops.dti.ne.jp/~allergy/vb/vbvba.html#bookpath
VB & VBAプログラミング
マクロ(VBA)を実行している Excel ファイルと同じフォルダは、
ThisWorkbook.Path
で参照可能です。
したがって、
> Application.Dialogs(xlDialogOpen).Show(”*AB*.xls”)
↓
Application.Dialogs(xlDialogOpen).Show(ThisWorkbook.Path + ”¥*AB*.xls”)
のように変更すれば、同じフォルダを参照できるようになるかと思います。
cx20 様の回答で正しいと思います。
ただ、¥ を全角で入力されているので、コピーして使用すると、kaiketsu様のコメントのように、一個上のディレクトリが表示されてしまうようです。
¥ を半角で入力してみてください。
半角でいれているつもりなのですが、もう一度試してみます。
sample ディレクトリにいれているとすると
ThisWorkbook.Path + ”¥*.csv”では、
sample*.csv になって、一個上のディレクトリになるようです。、