workbooks.open

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I would like to open 4 files with a macro. If I just open one file it works.
If I try to open more than one, I get a subscript out of range error.
Can you help me with this?
Thanks!

Workbooks.Open Sheets("files").Range("C3").Value
Workbooks.Open Sheets("files").Range("C4").Value
 
After the first workbooks.open, the opened workbook is the active
workbook, so your reference to Sheets("files").Range(..) is invalid
unless the just opened workbook has a worksheet named "files".

Try:

With ThisWorkbook.Sheets("files")
Workbooks.Open .Range("C3").Value
Workbooks.Open .Range("C4").Value
End With
 
That worked perfectly!
Thanks so much!

JE McGimpsey said:
After the first workbooks.open, the opened workbook is the active
workbook, so your reference to Sheets("files").Range(..) is invalid
unless the just opened workbook has a worksheet named "files".

Try:

With ThisWorkbook.Sheets("files")
Workbooks.Open .Range("C3").Value
Workbooks.Open .Range("C4").Value
End With
Click to expand...
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Open four Wbooks, copy four columns from each to Master Wbook 16
Run macro from active workbook whose name keeps changing 20
help with VBA program to import and add formatted files to one file 0
Get file name to open from cell 2
VBA code to run macro in certain file based on name of file in cel 2
Similar Book to Book Code, one works other does not 11
Opening and Naming Files 7
Run time error 9 (Subscript Out Of Range) 2

Back
Top