同一フォルダ内のファイルの読み込みに関して

お世話になります。 同一フォルダ内のファイルを読み込みたいのですが、 下記のようにファイルパスとファイル名を指定すれば読み込めますが、
EXCEL = CREATEOLEOBJ("Excel.Application")
EXCEL.visible = True
Excel.WorkBooks.Open(FileName :="D:\test.xls")
下記のようにファイル名だけだと読み込むことができません。
EXCEL = CREATEOLEOBJ("Excel.Application")
EXCEL.visible = True
Excel.WorkBooks.Open(FileName :="test.xls")
UWSCと同一フォルダ内のファイルを、 ファイルパスを指定せずにファイル名だけで読み込むにはどうしたらよいでしょうか? よろしくお願い致します。

関連情報:

  1. CSSのボタンを押したい

このエントリーを含むはてなブックマーク Buzzurlにブックマーク Yahoo!ブックマークに登録

コメント

  1. bowchann より:

    GET_CUR_DIR を使えば良いのではないでしょうか?

    EXCEL = CREATEOLEOBJ("Excel.Application")
    EXCEL.visible = True
    PRINT GET_CUR_DIR //オマケ
    Excel.WorkBooks.Open(FileName :=GET_CUR_DIR + "\test.xls")
    
  2. mak より:

    ありがとうございます。
    無事出来ました。


このページの先頭へ