Solved

msaccess VBA import file path - must it be physical path?

Posted on 2007-03-29
8
685 Views
Last Modified: 2012-05-05
Hi all, here's a straighforward question.

I've got a form in Access 2000, with a command button, on a Windows machine.

Click the buttton and an Excel spreadsheet is imported.

My question: Do I HAVE to use a physical path? Can I not use a relative path?

When I use no path at all -only the name of the Excel file-, and simply place the Excel file in the same directory as the Access file, Access searches the MyDocuments folder for the Excel file.

Right now the code to import the spreadsheet is:
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", "C:\data\MyFile.xls", True

Why doesn't this work:
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", "MyFile.xls", True ?
0
Comment
Question by:tom_burkhardt
  • 3
  • 2
  • 2
  • +1
8 Comments
 
LVL 34

Assisted Solution

by:jefftwilley
jefftwilley earned 50 total points
ID: 18818335
>>Access searches the MyDocuments folder for the Excel file.

What makes you say that?

When Access is installed, you are asked what to use for a default file location. This is of course as you've already found, not the same as the "relative" path.

To answer your question directly, yes...you can use the relative path, but you will need to determine what the setting is for your App. OTherwise, use the DB's current directory.
J
0
 
LVL 26

Accepted Solution

by:
jerryb30 earned 300 total points
ID: 18818336
it probably does work, but you expect to see it where  it isn't.
".\MyFile.xls"
will put it in current working path, which may not be database path.

add this to top of code:
Dim strpath As String
strpath = Left(CurrentDb.Name, InStrRev(CurrentDb.Name, "\") )
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", strpath & "myfile.xls" ,true


0
 
LVL 26

Expert Comment

by:jerryb30
ID: 18818346
debug.print curdir will give default location Jeff mentioned.
0
 

Author Comment

by:tom_burkhardt
ID: 18818533
thanks to both of you for the quick response!

Jeff, when I saw your answer of course I did a "Doh!" forehead slap.

JerryB30, thanks for the code, much appreciated, and it works beautifully. Now I have to look up InStrRev(). That's a new one to me, I've only been exposed to InStr().

 I increased the pointage to give Jeff 50 for making me think, and JerryB an extra 50 because he gave me a working code example I hadn't asked for.
0
Enterprise Mobility and BYOD For Dummies

Like “For Dummies” books, you can read this in whatever order you choose and learn about mobility and BYOD; and how to put a competitive mobile infrastructure in place. Developed for SMBs and large enterprises alike, you will find helpful use cases, planning, and implementation.

 
LVL 26

Expert Comment

by:jerryb30
ID: 18818619
instrrev:New since Access 2000. Especially useful for extracting a full path when given a path\filename.
I personally change  my default location in Tools-Options-General to ".\"
Then I can easily invoke it when doing imports, exports. But being able to find currentdb path dynamically is more flexible.

Thanks.
Welcome back Jeff.
0
 
LVL 34

Expert Comment

by:jefftwilley
ID: 18818712
Thanks Jerry, good to be back! and...Glad it's sorted out Tom. Love these quick and informative ones :o)
J
0
 
LVL 1

Expert Comment

by:genaughton
ID: 18818715
>When I use no path at all -only the name of the Excel file-, and simply place the >Excel file in the same directory as the Access file, Access searches the >MyDocuments folder for the Excel file.

I assume it's using the value from the Tools\Options menu, under the General tab -- the "Default database folder:" setting.

When I'm designing forms where I'm dealing with outside files, I use an unbound textbox (i.e., txtFileLocation) that you can populate via a command button with the GetOpenFile routine attached to it's OnClick event.  That code's available at my SECOND favorite Access site:

http://www.mvps.org/access/api/api0001.htm

Then you use:

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "tblMyTable", Me!txtFileLocation, True

Regards,
JN
0
 

Author Comment

by:tom_burkhardt
ID: 18820872
holy smokes, you guys ...  just checked my email and saw all these notifications from EE. Thank you so much not only for your help, but the generous spirit it was given in! Very much appreciated. Always love learning something new. I've been self-taught in VBA, VBScript/ASP, Access and MySQL since an early retirement a few years ago, and there's a real satisfaction when the old grey cells light up in understanding a new concept (rare yet satisfying).

I like that suggestion to make my default location in Tools-Options-General to ".\"  They say the sign of true genius is the ability to see the obvious! That had simply never occured to me.

And genaughton, thanks, I've bookmarked that site. The more resources the better, and I'm never ashamed to ask for help.

Thanks again, all.
0

Featured Post

Enterprise Mobility and BYOD For Dummies

Like “For Dummies” books, you can read this in whatever order you choose and learn about mobility and BYOD; and how to put a competitive mobile infrastructure in place. Developed for SMBs and large enterprises alike, you will find helpful use cases, planning, and implementation.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Help writing a query 6 73
Error in query expression 3 37
Open CSV, modify and save as xls from Access 12 19
Access Excel export not behaving 2 26
Today's users almost expect this to happen in all search boxes. After all, if their favourite search engine juggles with tens of thousand keywords while they type, and suggests matching phrases on the fly, why shouldn't they expect the same from you…
A simple tool to export all objects of two Access files as text and compare it with Meld, a free diff tool.
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.
In Microsoft Access, learn how to use Dlookup and other domain aggregate functions and one method of specifying a string value within a string. Specify the first argument, which is the expression to be returned: Specify the second argument, which …

867 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

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now