2015-05-29 7 views
0

Я пытаюсь скопировать ряд ячеек с одного листа (Sheet2) в другой диапазон ячеек на другом листе (Sheet1), но когда я запускаю ниже, Я получаю установленную ошибку времени выполнения (1004) или объектную ошибку. Любая помощь приветствуется!Копирование и вставка диапазона ячеек с одного рабочего листа на другой рабочий лист

Option Explicit 

Sub deletecolumns() 

Workbooks(1).Worksheets(1).Columns(2).Select 
Workbooks(1).Worksheets(1).Columns(2).Delete 


Sheets("Sheet2").Range("I4:I29").Copy Destination:=Sheets("Sheet1").Range("H4:H29") 

End Sub 

ответ

1

удалить эту строку:

Workbooks(1).Worksheets(1).Columns(2).Select 

нет никакой потребности в этом, прежде чем делать .delete все равно

+1

Причина это не удается, потому что вы, вероятно, не имеют 'Worksheets (1)' активировано , Вам не разрешено «Выбрать» на «Рабочем листе», который неактивен. –

+1

Спасибо за продолжение, @Byron. Я избегаю '.select', когда это возможно, поэтому я не знаю всех подводных камней ... – FreeMan

+0

К сожалению, все мы должны были где-то начинать. Я начал со здоровой дозы 'Select'' Activate' и 'Cells (i, j)', прежде чем я узнал, как это сделать правильно. –

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