Open Workbook (VBA)

[Excel VBA]

The code (exerpt) below reads the files in a folder and then opens
them one at a time in a loop, however, I get a Run-time Error 1004
stating that the first file could not be found. Frustrating since the
file is specifically identified by name and file extension, so, if it
can be seen/identified, why can't it be opened?

I have only included the steps until the run-time error.

Sub Allocation_Step2()

Dim fso As Object
Dim fsoFiles As Object
Dim fsoFile As Object
Dim wbCurrent As Workbook

Set fso = CreateObject("Scripting.FileSystemObject")
Set fsoFiles = fso.GetFolder("C:\Documents and Settings\eo883d\Desktop
\EE Reports\").Files

If Not fsoFiles Is Nothing Then
For Each fsoFile In fsoFiles
Set wbCurrent = Workbooks.Open(fsoFile.Name, , True)

 

[GS]

Excel VBA formulated the question :

The code (exerpt) below reads the files in a folder and then opens
them one at a time in a loop, however, I get a Run-time Error 1004
stating that the first file could not be found. Frustrating since the
file is specifically identified by name and file extension, so, if it
can be seen/identified, why can't it be opened?

I have only included the steps until the run-time error.

Sub Allocation_Step2()

Dim fso As Object
Dim fsoFiles As Object
Dim fsoFile As Object
Dim wbCurrent As Workbook

Set fso = CreateObject("Scripting.FileSystemObject")
Set fsoFiles = fso.GetFolder("C:\Documents and Settings\eo883d\Desktop
\EE Reports\").Files

If Not fsoFiles Is Nothing Then
For Each fsoFile In fsoFiles
Set wbCurrent = Workbooks.Open(fsoFile.Name, , True)

Is the file an Excel workbook?

 

[Javed]

The name property returns only the name of file and to open we need to
specify the path.So use Path property of File object also.

 

[GS]

It happens that Javed formulated :

The name property returns only the name of file and to open we need to
specify the path.So use Path property of File object also.

Thanks for that! I did miss that important point as I'm not a user of
FSO for getting file locations. Makes perfect sense!