Macro/Cmd to Import Excel file into Access

Posted on 2010-09-14
Medium Priority
Last Modified: 2013-11-28
I have a temp table in Access that I import data into and then (based on various criteria) append to a second table.

I'd like to automate the import process into the temp table.  Currently I delete current records and then go through the import wizard, etc, etc.  I'm planning to use a macro and can use all the STD commands fir deleting current records and running update/append queries.  My issue is the import of te Excel file.  Is there a command or something I can run within the macro to do the import?  I will be importing a file with a STD name and set file path location.  It will be imported into an existing table.  Currently using Excel 2003 but will soon be upgrading to 2010 if that needs to be considered.  I am using Access 2000.  Thanks.
Question by:vsllc
  • 5
  • 3
  • 2
LVL 41

Accepted Solution

als315 earned 2000 total points
ID: 33675228
If file name and path is always same, you can link this file to your DB and run queries from macro to delete/append records to existing table. Excel 2010 can save in format of Excel 2003 if there will be any problems with linking Excel 2010 file to Access 2000.
LVL 41

Expert Comment

ID: 33675254
I can recommend you to use csv format if you have in one column mixed text and numeric cells.

Author Comment

ID: 33675301
Can't export from source system as csv.

I never thought of linking to Excel.  I'll give it a try.
Easily Design & Build Your Next Website

Squarespace’s all-in-one platform gives you everything you need to express yourself creatively online, whether it is with a domain, website, or online store. Get started with your free trial today, and when ready, take 10% off your first purchase with offer code 'EXPERTS'.

LVL 41

Expert Comment

ID: 33675496
Excel can save file as csv. It can be done with simple macro, which you can run from Access before import, or it is possible from VBA open Excel and save your file as csv. Do it if in linked file some cells will have wrong values.

Author Comment

ID: 33675642
Does the link only impact alphanumeric fields?

How would I add a macro to do thus within my Access macro?  My goal is to basically make this a 1 click process so I don't want to have to open Excel to save ad csv and then start process.
LVL 41

Expert Comment

ID: 33682138
You can use this sub for file conversion (compiled from many sources):
(change path from current to your)
Sub SaveAsCSV_xlFile(XlsFileName as string, CSVFileName as string)
    Dim oXL As Object
    Dim sFullPath, sFullPath1 As String
'   Create a new Excel instance
    Set oXL = CreateObject("Excel.Application")
'   Full path of excel file to open
    On Error GoTo ErrHandle
    sFullPath = CurrentProject.Path & XlsFileName
    sFullPath1 = CurrentProject.Path & CSVFileName
'   Open and save as it
    With oXL
        .Visible = True
        .Workbooks.Open (sFullPath)
        .ActiveWorkbook.SaveAs FileName:=sFullPath1, FileFormat:=6
    End With
    Set oXL = Nothing
    Exit Sub
    oXL.Visible = False
    MsgBox Err.Description
    GoTo ErrExit
End Sub

Open in new window

LVL 37

Expert Comment

ID: 33685137
Why not take a look at the DoCmd.TransferSpreadsheet method?

That's the usual way to import data from Excel into Access.

It has various arguments you can specify and you can use it to create a new table or append to an existing table.

That should do the import then you can run your queries from code using DoCmd.RunSQL.

No need to open Excel really, in fact if you try to import from an open file you might run into problems.
LVL 41

Expert Comment

ID: 33693322
Transferspreadsheet very often can not correctly import fields. Is better use csv file, import (or link) it as text file, and then make conversion to Access tables.
LVL 37

Expert Comment

ID: 33693613
Eh, how?

If you do things properly and the data is well-defined then you should have no problem with TransferSpreadsheet.

Well not any problem you would have importing the same data in CSV format using TransferText.

If there was a problem it would most likely be something to do with data types and it would apply to both methods.

One solution for that is to import to an existing table with the correct data types for the fields.

Another is to import into a table where the fields are all text.

Once you've got the data in Access you can go on and convert it as required, as you've indicated.

Author Closing Comment

ID: 33695988
Thanks.  This worked.

Featured Post

Upgrade your Question Security!

Your question, your audience. Choose who sees your identity—and your question—with question security.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Sometimes MS breaks things just for fun... In Access 2003, only the maximum allowable SQL string length could cause problems as you built a recordset. Now, when using string data in a WHERE clause, the 'identifier' maximum is 128 characters. So, …
When we develop an application in Ms Access 2016 we should also try to protect the queries, macros and table links. I know I may not have a permanent solution but for novice users, they will not manage to break your application. Below is the detail …
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…
Enter Foreign and Special Characters Enter characters you can't find on a keyboard using its ASCII code ... and learn how to make a handy reference for yourself using Excel ~ Use these codes in any Windows application! ... whether it is a Micr…

587 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question