vba 使用宏从 csv 导入到 ms 访问表

声明:本页面是StackOverFlow热门问题的中英对照翻译,遵循CC BY-SA 4.0协议,如果您需要使用它,必须同样遵循CC BY-SA许可,注明原文地址和作者信息,同时你必须将它归于原作者(不是我):StackOverFlow 原文地址: http://stackoverflow.com/questions/1236901/
Warning: these are provided under cc-by-sa 4.0 license. You are free to use/share it, But you must attribute it to the original authors (not me): StackOverFlow

提示:将鼠标放在中文语句上可以显示对应的英文。显示中英文
时间:2020-09-11 10:40:09  来源:igfitidea点击:

Import from csv to ms access tables using macro

vbams-accessaccess-vba

提问by SmartestVEGA

Can some provide me a VBA macro to import data from a CSV file into ms access tables ?

有些人可以为我提供一个 VBA 宏来将数据从 CSV 文件导入到 ms access 表中吗?

回答by SmartestVEGA

INSERT INTO tblSomeTable ( [TRADE DATE], REP, REPID, [ACCOUNT/POLICY],
                          CUSTOMER, [REP# COMPANY], [PRODUCT NAME], QUANTITY, [FACE AMOUNT],
                          [GROSS COMMISSION], [CUSTOMER SSN] )
SELECT [TRADE DATE], REP, REPID, [ACCOUNT/POLICY],
        CUSTOMER, [REP# COMPANY], [PRODUCT NAME], QUANTITY, [FACE AMOUNT],
        [GROSS COMMISSION], [CUSTOMER SSN]
FROM [Text;
      FMT=Delimited;
      HDR=YES;
      CharacterSet=437;
      DATABASE=C:\Documents And Settings\spauldb\Desktop].Transactions_Jan1_to_Jan30.csv
WHERE [TRADE DATE] Is Not Null;

回答by Fionnuala

I would use TransferText for CSV:

我会为 CSV 使用 TransferText:

DoCmd.TransferText acImportDelim, , "NewTable2", "c:\docs\ltd.csv", True

It is often a good idea, but not always necessary, to use an import specification or to import to an existing table when working with text files.

在处理文本文件时,使用导入规范或导入到现有表通常是一个好主意,但并非总是必要的。

回答by shahkalpesh