Open workbook in user-defined folder

[pdberger]

I've written a set of two workbooks for use by many different people.
"Instrument Panel User Data.xls" calls information out of "Instrument Panel
Reference Data.xls".
I don't know where each user will store these two files but I want to set
things up so that, as long as they're in the same folder, the 'User Data'
will find and open 'Reference Data'.

My code don't work! Here it is:

Private Sub Workbook_Open()
Dim File_Path As String
Dim File_Name As String

File_Path = ThisWorkbook.Path
File_Name = File_Path + "Instrument Panel Reference Data.xls"
Workbooks.Open Filename:="File_Name"


End Sub

What am I doing wrong? Do I have to slit my wrists? Say it ain't so!

 

[Doug Glancy]

pdberger,

It ain't so! Untested, but I think this will do it:

File_Name = File_Path & "\" & "Instrument Panel Reference Data.xls"

hth,

Doug

 

[pdberger]

Doug -- It still may be so! I continue to get a Run-time error '1004' .
The message reads:

"'File_Name.xls' could not be found. Check the spelling of the file name,
and verify that the location is correct."

I believe both of those two possible problems to be OK. I tried removing
the '.xls' from the 'File_Name =' statement.

Thanks anyway for your help, and thanks in advance to anyone else who offers
advice.

 

[Doug Glancy]

pdberger,

Change the line:
Workbooks.Open Filename:="File_Name"
to:
Workbooks.Open Filename:=File_Name

By putting it in quotes, you were telling it that Filename equals "FileName"
not "Instrument ..."

hth,

Doug

 

[pdberger]

Doug --

You dood it, dude! Muy goodo (as they say in Spanish)!

Thanks for your help!

Peter