How to get data from Excel sheet, and add that data into Ms-access database?

  • Thread starter Thread starter Nagarajan .A
  • Start date Start date
N

Nagarajan .A

I need to read an excel file, and add that data into msaccess database.
Can anyone help me?

Thanks in advance.
 
¤ I need to read an excel file, and add that data into msaccess database.
¤ Can anyone help me?
¤

Try the following:

Public Sub ImportExcelToAccess()

Dim AccessConn As New System.Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;"
& _
"Data Source=e:\My Documents\db1.mdb")

AccessConn.Open()

'New table
Dim AccessCommand As New System.Data.OleDb.OleDbCommand("SELECT * INTO [tblSheet1] FROM
[Excel 8.0;DATABASE=e:\My Documents\Book10.xls;HDR=NO;IMEX=1].[Sheet1$]", AccessConn)

AccessCommand.ExecuteNonQuery()
AccessConn.Close()


End Sub


Paul ~~~ (e-mail address removed)
Microsoft MVP (Visual Basic)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

How to Keep Excel Sheet Formatting On a CSV Sheet with vba 1
The data in a linked Excel spreadsheet column is truncated to 255 characters in an Access database 0
VBA - retrieve data on last create named range from previous inserted named range 0
Retrieve data from Access database and fill data in form 0
Excel How to extract the data from Excel . 0
Lookups - how to obtain data from a master spreadsheet into another 5
Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0
Copy and move Access 13 database on laptop to pc with Access 13 0

Back
Top