Help with VBA "DoCmd.TransferSpreadsheet acImport ......."

  • Thread starter Thread starter EagleOne
  • Start date Start date
E

EagleOne

2003

I would like the data imported into a table in a non-current() database.

DoCmd.TransferSpreadsheet acImport, , strTableName, myPath & strTableName & ".xls", True
(The above command works but .... I want the data to go to strTableName in another database]

Any coding help appreciated

TIA EagleOne
 
You need to instantiate another instance of Access, set its CurrentDatabase
appropriately, and then do your import. Something like the following
untested air-code:

Dim appAccess As Access.Application

Set appAccess = New Access.Application
appAccess.OpenCurrentDatabase "C:\Folder\File.mdb"
appAccess.DoCmd.TransferSpreadsheet acImport, , strTableName, myPath &
strTableName & ".xls", True
appAccess.CloseCurrentDatabase
Set appAccess = Nothing
 
Excellent and Complete answer.


Douglas J. Steele said:
You need to instantiate another instance of Access, set its CurrentDatabase
appropriately, and then do your import. Something like the following
untested air-code:

Dim appAccess As Access.Application

Set appAccess = New Access.Application
appAccess.OpenCurrentDatabase "C:\Folder\File.mdb"
appAccess.DoCmd.TransferSpreadsheet acImport, , strTableName, myPath &
strTableName & ".xls", True
appAccess.CloseCurrentDatabase
Set appAccess = Nothing

--
Doug Steele, Microsoft Access MVP

(no private e-mails, please)


2003

I would like the data imported into a table in a non-current() database.

DoCmd.TransferSpreadsheet acImport, , strTableName, myPath & strTableName
& ".xls", True
(The above command works but .... I want the data to go to strTableName in
another database]

Any coding help appreciated

TIA EagleOne
Click to expand...
Click to expand...
 
Back
Top