用于非std文件扩展名的MS Access VBA数据导入

时间:2016-04-04 10:43:29

标签: vba ms-access access-vba

我正在努力寻找将文件导入访问表所需的代码。

这是一个直接的文本文件导入,但源文件来自第三方系统,因此文件扩展名不是通常的.txt文件扩展名。

相反,文件显示为" .ZZ; 1"

这意味着为了导入访问权限,我必须在执行导入之前手动更改文件扩展名。

我想知道是否有办法导入文件(使用VBA)及其给定的扩展名?

或许有一段代码允许我在运行导入脚本之前将文件扩展名更改为访问可以读取的内容。

任何帮助或指示都将不胜感激。

1 个答案:

答案 0 :(得分:2)

通过在导入文件之前将文件重命名为标准扩展名(.txt或.csv),您可以省去一些悲伤。

重命名:使用Name Statement

e.g。

strNewName = Replace(strPathFile, ".ZZ;1", ".txt")
Name strPathFile As strNewName

或者如果您不想更改原始文件,请使用FileCopy FunctionFileSystem.CopyFile