ms-access - Access 2003、ファイルをインポートするコードが必要、仕様を実行してテキストに変換、ファイルの名前を変更

Question

私はこれにかなり苦労しました-誰か助けてもらえますか? ファイルをインポートするコマンド ボタンのコードが必要です (ファイルは毎回異なりますが、常に txt または csv のいずれかになります)。すべてのデータ型をテキストに変換するインポート仕様を実行します (仕様は SpecsTest と呼ばれます)。次に、テーブルを「Scrubbed」と呼びます (元のファイル名ではありません)。また、機能するマクロを作成することもできませんでした。問題は、これを実行するたびに未加工のファイル名が異なることです。

Answer 1

アクセスは使っていませんが、エクセルはよく使っています。これを試して：

Dim ds As FileDialog
Set ds = Application.FileDialog(msoFileDialogOpen)
ds.Show
Dim path as String
path = ds.SelectedItems(1)

ファイルが選択されていることを確認するなどのチェックを追加する必要がありますが、これで正しい軌道に乗るはずです。ところで、デフォルトのディレクトリ、フィルターなどを FileDialog で構成できるので、ユーザーがインポートを台無しにする傾向を制限できるはずですが、決してわかりません。