如何使用VBA代码将csv文件导入Access？

Question

我有一个csv文件,我需要使用VBA导入Access.

我正在使用以下代码:

Call DoCmd.TransferText(acImportDelim, , TableName, SourceFile, HasFieldNames)

TableName,SourceFile和HasFieldNames是存储有关文件信息的变量.

导入有效但我在表中只导入了一列.

有人有想法吗？

该文件是带有分隔符";"的csv 并有多个列.

谢谢.

Answer 1

"CSV"代表"逗号分隔值".因此,默认导入功能会查找逗号.

如果您使用逗号以外的任何内容,请尝试以下操作:

1. 手动开始导入文件.

2. 在指定设置之后,在单击"完成"之前,单击"高级..."

3. 单击"另存为"并指定名称(或接受Access提议的名称).

4. 记下您选择的名称,让我们说"数据导入规范".

5. 单击"确定"两次,然后取消导入.

6. 现在使用您在代码中创建的导入规范:

   DoCmd.TransferText acImportDelim,"数据导入规范","表1","D:\ Data.csv",错误