2013-12-19 6 views
0

Похожих на этот постКак я могу скопировать и вставить диапазон из закрытой книги Excel с помощью VBA

Iterate through spreadsheets in a folder and collect a value from each

Я пытаюсь сделать то же самое, но вместо одного значения, я хотел бы, чтобы петля до 52 различных массивов, например (с использованием кода pseduo), внешний путь

For each workbook in path 
While week < 52 
    week1 = path.workbook.sheet1.range(A1:J20); 
    consol.range("A" & row & ":J " & row2) = week1 
    row = row + 20 
    row2 = row2 + 20 
    week++ 
Wend 
Next 

Возможно ли это?

+0

Если вы отправляетесь на путь копирования-вставки, сначала нужно открыть книгу. – Manhattan

+0

Есть ли способ сделать это без? Я думаю, поскольку диапазон всегда фиксирован (A1: J20), что я могу создать «держатель», связанный с этой книгой на вкладке, а затем для каждой ячейки обновления книги «C1» на этой вкладке владельца, которая обновляет диапазон замещающих в той же книге? – Mike

+1

Посмотрите, есть ли [это] (http://stackoverflow.com/questions/15978391/how-can-i-read-information-from-a-specific-cell-in-a-closed-workbook-then-paste) работает для тебя. – Manhattan

ответ

0

Я только что проверил свои записи, и я получил это:

week1="'" & path & "[" & FileName & "]" & Sheet1.Name & "'!" & _ 
Range("A1:J20").Range("A1").Address (,,xlR1C1) 

Я думаю, что она все еще нуждается в некоторой настройке, потому что я был потерян в части «А1» кода ...

Это вам помогает?

Смежные вопросы