Logo 
Search:

MS Office Answers

Ask Question   UnAnswered
Home » Forum » MS Office       RSS Feeds
  Question Asked By: Diem Tran   on Sep 12 In MS Office Category.

  
Question Answered By: Gloria Cook   on Sep 12

Please correct the code  as follows. I will not write  the full thing because
the error  is only in the beginning few lines.

Dim FileString as string
i=3
Do while cells(i,1) <> ""
Sheets("Final....").select
FileString = Cells(i,1) & "_06.xls"
Workbooks.Open Filename:=FileString
Workbooks(FileString).Sheets(1).Copy Before:=Workbooks("CHEP
......xls").Sheets(1)
Windows(FileString).Close

Share: 

 

This Question has 3 more answer(s). View Complete Question Thread

 
Didn't find what you were looking for? Find more on Run-Time Error 9 - Trying to refer to cells in worksheet Or get search suggestion and latest updates.


Tagged: