Open Workbook (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) |
Open Workbook (VBA)
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? -- Garry Free usenet access at http://www.eternal-september.org ClassicVB Users Regroup! comp.lang.basic.visual.misc |
Open Workbook (VBA)
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. |
Open Workbook (VBA)
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! -- Garry Free usenet access at http://www.eternal-september.org ClassicVB Users Regroup! comp.lang.basic.visual.misc |
All times are GMT +1. The time now is 03:07 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com