Open files Error in Excel 2007

  • Thread starter Thread starter Len
  • Start date Start date
L

Len

Hi,

I need someone to help me to rectify the following VBA codes which had
taken from other excel file to use for Excel VBA learning exercise.
However, I face the problem when I run excel macro on these codes in
Excel 2007, it prompts the error “ Method ‘Open’ of object ‘Workbooks’
failed” and it stops at VBA code “ Workbooks.Open filenams (counter)

Dim lngCount As Long
Dim filenames As Variant
filenames = Application.GetOpenFilename(, , , , True)
counter = 1
While counter <= UBound(filenames)
Workbooks.Open filenames(counter)
counter = counter + 1
Wend

Thanks in advance
Regards
Len
 
Len,

From the Immediate Window pane in VBA, reply with the value for counter by
typing the following:

?counter
 
the only time i get an error is when the open file dialog is cancelled. In
that case the value of filenames is "false" and can be checked in code

otherwise code runs for me with the addition of
Dim counter As Long

in both 2003 and 2007
 
Back
Top