ExcelVBAでカレントディレクトリのファイルを開く方法は？

質問

ExcelVBAでファイルを開くとき、
Workbooks.OpenText Filename:="D:\DataDir\TestFile.txt"
とフルパスを指定すれはファイルを開けますが、パス指定なしでカレントディレクトリ（VBAを起動したExcelファイルがあるディレクトリ）のファイルを開くためにはどうしたらいいんでしょうか？

教えてください。ちなみにExcel2000を使っています。

回答No.2

popesyu · ベストアンサー

○カレントディレクトリ
CurDir

○ThisBookのあるディレクトリ
ThisWorkbook.Path

○ActiveBookのあるディレクトリ
ActiveWorkbook.Path

○ThisBookのフルパス
ThisWorkbook.FullName

○XLStartのパス
Application.StartupPath

実際に書くコードはこんな感じ。
Workbooks.OpenText Filename:=ThisWorkbook.Path
　&　"\TestFile.txt"

お礼

これでばっちりです。ご丁寧にありがとうございました。m(_ _)m

回答No.1

noname#6715

CurDir関数等をVBAのヘルプで
引いてみてください。

お礼

ありがとうございました。
CurDir関数があるというのは知りませんでした。