Import CSV file to an access table

[Per_]

Hello all, I would like to import an CSV file (see below) to an table in access with the command below. I only get one field name in the table with the
name: Header1;Header2. How can I get two field name: Header1 and Header2?

/P

Command
========

DoCmd.TransferText _
        TransferType:=acImportDelim, _
        TableName:="TEST", _
        FileName:="C:\TEST.CSV", _
        HasFieldNames:=True

CSV file
=======

Header1;Header2
1;2

 

[smozgur]

You need an "Import Specification" since CSV file is semicolon delimited.

To create the specification you need to attempt importing the data manually once, so you can save the specification, and use it with the VBA code later.

1. Select External Data -> New Data Source -> From File -> Text File
2. Browse and select the CSV file to import into your table.
3. Then the Import Text Wizard dialog is opened. Set the import properties, but do not close the wizard yet.
4. Click on Advanced button at the bottom left. This opens the specification dialog.
5. Click Save As, name it properly, for example "SemiColonImportSpec", and save it.
6. Now you can cancel the import since all we need was saving the specification file.

Go back to your VBA code, and include one more parameter, which is called : SpecificationName:

DoCmd.TransferText _
TransferType:=acImportDelim, _
SpecificationName:="SemiColonImportSpec", _
TableName:="TEST", _
FileName:="C:\TEST.CSV", _
HasFieldNames:=True