使用VBA导入带分隔符的文本

Gut*_*oth 7 ms-access vba ms-access-2007 access-vba

我正在尝试自动添加新的txt文件,它们都具有相同(已知)的布局.

使用选项卡(TAB按钮)分隔列.是否可以在VBA中执行此操作,如在Access向导中导入文本文件?

我DoCmd.TransferText在VBA中使用该方法

Bra*_*rad 12

您需要通过向导一次来制作规范文件.为此,请像平常一样导入文本文件,但在深入了解向导之前,请单击左下角的"高级..."按钮.这是您制作spec文件的地方.

在此输入图像描述

使这些列与您的输入文件,数据类型和所有列匹配.{tab}如果您使用的是字段分隔符和相应的文本限定符,请务必选择该字符分隔符.

在此输入图像描述

保存您的规范(稍后可以通过返回到同一屏幕进行编辑,Specs...然后单击然后保存旧版本)

现在你可以像这样在VBA中使用

DoCmd.TransferText acImportDelim, "your spec name", "destination table name", sourceFilePath
Run Code Online (Sandbox Code Playgroud)

有一个参数HasFieldNames,你必须决定它是否true或false基于你的文件.