This is grinding me down and appears to be a simple issue. I'm trying to loop through 4 workbooks that are opened alongside other books, then from the same named sheets from each of the 4, copy rows. It's not working. Any thoughts would be appreciated.
Sub School_Generator_2015() Dim WB_temps() As Workbook Dim Cnt as Integer, Sheet_cnt as integer Dim Sheet_names() As Variant, School_Index As Range Sheet_names() = Array("sheet1", "sheet2", "sheet3") For Cnt = 0 To 3 Set WB_temps(Cnt) = Workbooks.Open("schools_data_" & (Cnt)& ".xlsx") 'simplified path but this works Next Cnt For Cnt = 0 To 3 For Sheet_cnt = 0 To 2 Set School_Index = WB_temps(Cnt).Worksheets(Sheet_names(sheet_cnt)).Range("A1:A900") ‘<--does not work ‘now copy rows etc Next Sheet_cnt Next Cnt