this question has answer here:
- excel vba, getting range inactive sheet 3 answers
i have tried various expressions [what appears be] simple task of copying excel table between 2 worksheets. in addition, need enclose expression inside loop. here 4 expressions (all beginning "sheets") have tried. of them compile, crash upon running:
p = 6 = 1 numtables 'read "op lls" table "eirp budget" sheets("eirp budget").[b6:l17] = sheets("op lls").range(cells(p, 2), cells(p + 11, 12)) sheets("eirp budget").[b6:l17] = sheets("op lls").[cells(p, 2), cells(p + 11, 12)] sheets("op lls").range(cells(p, 2), cells(p + 11, 12)).copy sheets("eirp budget").[b6] sheets("op lls").["b" & p & : & "l" & p + 11].copy sheets("eirp budget").[b6:l17] p = p + 15 next any appreciated.
i suspect having difficulties because of unqualified cells (you're not specifying worksheet cells refers to)
try (not tested):
dim wkscopyfrom worksheet dim wkscopyto worksheet set wkscopyfrom = sheets("op lls") set wkscopyto = sheets("eirp budget") = 1 numtables p = 6 'read "op lls" table "eirp budget" wkscopyfrom.range(wkscopyfrom.cells(p,2), wkscopyfrom.cells(p+11,12)).copy wkscopyto.range("b6") p = p + 15 next 