I'm running Windows 2000 and Excel 2003.
When I run the code below, I get a "Run-time eorr '1004': Method 'Open' of
object 'Workbooks' failed" error.
Can someone tell me why?
TIA

Sub Macro()
Workbooks.Open Filename:= _
"C:\downloads\GPF_PY.xls"
End Sub



--
Ken Hudson

I'd guess that the file didn't exist.

Typing error in the folder/filename????

Ken Hudson wrote:

I'm running Windows 2000 and Excel 2003.
When I run the code below, I get a "Run-time eorr '1004': Method 'Open' of
object 'Workbooks' failed" error.
Can someone tell me why?
TIA

Sub Macro()
Workbooks.Open Filename:= _
"C:\downloads\GPF_PY.xls"
End Sub

--
Ken Hudson

--

Dave Peterson

Thanks for the reply. This was really puzzling to me.
The initial file was saved as a CSV file and then opened in Excel and saved
as an Excel file. It did exist as an Excel file.
The problem was that, when it was saved as a CSV file, its worksheet brought
the default name ".csv)GENSOFMO(2)" with it. I saved the file in Excel with
that worksheet name. I can open the workbook "manually", but got the error
when trying to use VB.
I renamed the worksheet and life is good again.
--
Ken Hudson


"Dave Peterson" wrote:

I'd guess that the file didn't exist.

Typing error in the folder/filename????

Ken Hudson wrote:

I'm running Windows 2000 and Excel 2003.
When I run the code below, I get a "Run-time eorr '1004': Method 'Open' of
object 'Workbooks' failed" error.
Can someone tell me why?
TIA

Sub Macro()
Workbooks.Open Filename:= _
"C:\downloads\GPF_PY.xls"
End Sub

--
Ken Hudson

--

Dave Peterson

Hi Ken

This script will allow you to select the file you wish to open, if the format
you want ins't csv then change it to desired format

Application.DisplayAlerts = False
Application.ScreenUpdating = False

fileToOpen = Application _
.GetOpenFilename("Comma Delimited (*.csv), *.csv")
If fileToOpen < False Then
TextBox2.Value = "Opening " & fileToOpen
Else
Exit Sub
End If

Workbooks.OpenText Filename:="" & fileToOpen
DoEvents

--
Message posted via http://www.officekb.com