CSVファイルをインポートする際、「保存済みのインポート操作」を利用、かつ、パス＆ファイル名を指定したい（できればマクロで）

Question

■環境：
・Access2007
・Windows7Pro

■やりたいこと：
・CSVファイルをインポートしたい
・できればマクロで、できなければVBA
・ファイル名をプログラムでカレントパス＆固定ファイル名にしたい

■現状：
・マクロの「保存済みのインポート/エクスポート操作の実行」だと実行できるが、
ファイル名をプログラムでカレントパス＆固定ファイル名にできない
・VBAの「DoCmd.TransferText」だとエラー
「実行時エラー 3625：テキストファイルの指定 'インポート定義体名' が存在しません。」になる

■その他：
・「保存済のインポート操作」には、再実行可能なレコード（データ？）がある
・「MSysIMEXColumns」「MSysIMEXSpecs」のどちらにもレコードが見当たらない

■質問：
上記の状況で、できればマクロで、できなければVBAでおこなう方法を知りたい

よろしくお願いします。

Answer 1

まず確認すべき部分。
MS Accessのバージョンは？2000とそれ以降では動作が異なるので。
2000であれば”テキスト変換”、2010以降ならば"テキストのインポート/エクスポート"なので。
いずれにしてもファイル名はフルパスで指定。きっとこの部分の事を言われていると思いますが、Accessのカレントパスがどこ？とはっきりわかれば、そこを定数として定義すれば一番の解決方法と思います。
マイドキュメント？それともその下位に作成されたディレクトリー？
経験的にカレントディレクトリーで嵌るケースがあります。
出来れば環境変数で絶対パスを指定して、これを用いる事を勧めます。
（環境変数の変更で簡単に移行ができるから）

Comments

[q_a]

ご回答いただきまして、ありがとうございます。

> MS Accessのバージョンは？

2007です。

> 出来れば環境変数で絶対パスを指定して

「保存済みのインポート/エクスポート」のパスとファイル名を固定ではなく、
環境変数を参照する形にすることができるという意味でしょうか。

もし、そうでしたら、その方法を教えていただけますでしょうか。

よろしくお願いいたします。

[MasahikoHirata]

vbaでの実装として環境変数は、
Environ("（使いたい環境変数)")で取得できます。
例えば"Q_A_DB"という環境変数を定義したとして
Environ("Q_A_DB") & Filename　なんて書くと Q_A_DBの中身＋ファイルネーム

また現在のカレントパスは
Application.CurrentProject.Pathで取得できます。

[q_a]

ご回答ありがとうございます。

カレントパスの取得と、環境変数の使用方法について、教えていただいて、ありがとうございます。

「保存済みのインポート/エクスポート」のパスとファイル名を更新する方法が分からず困っております。

もし、ご存じでしたら、教えていただけますでしょうか。

よろしくお願いいたします。

[MasahikoHirata]

”「保存済みのインポート/エクスポート」のパスとファイル名を更新する”とは？
既に存在しているファイルについてと思いますが、その際にパス及びファイル名は既知ですよね？

[q_a]

ご回答いただきまして、ありがとうございます。

分かり難くて申し訳ございません。
タイトルを更新しました。

本件は、CSVファイルをインポートする際に、「保存済みのインポート操作※」を利用、
かつ、パス＆ファイル名を変更したいという趣旨になります。

※「外部データ」
→「保存済みのインポート操作」
→「データタスクの管理」
→「保存済みのインポート操作タブ」
→「インポート操作タブ」
に表示される「インポート定義（体？）」になります。

お手数をおかけいたしますが、
ご存知でしたら、教えていただけますでしょうか。

よろしくお願いいたします。