Hente en Excel tabel ind i Access fra eksternt VB-program

is access installed?

Yes

And the connection is made as well. I´m retrieving data from there in the same program.. Just need to get some additionel data into it from excel.

OK, if Access is installed then you can automate access from your vb program and get Access to import the file.


Something like this

Dim acc As Access.Application

    Set acc = CreateObject("Access.Application")

    acc.OpenCurrentDatabase "C:\test.mdb"

    acc.DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "TableNameGoesHere", "c:\mytestfile.xls

Thanks that did the trick - almost :)

Instead of using the first row as columnnames it names the columns F1, F2, F3 etc - and places the column.names from the spreadsheet in the first row of the db.. anything to do about that?

Jeff

acc.DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, "TableNameGoesHere", "c:\mytestfile.xls, True


The last parameter (true) for column headings

awesome.. Thanks a lot.

selv tak

er det her i øvrigt noget du har forstand på`??

http://www.eksperten.dk/spm/913797