Excel VBA - ошибка времени выполнения 1004 при упрощении записанного кода

Question

У меня есть записанный макрос, который я попытался упростить, получив несколько операторов активации и выбора в одну строку, но это приводит к ошибке выполнения.

Это не критическая проблема, но мне просто интересно узнать, что происходит. Это мой начальный фрагмент кода (он предшествует копирования фрагмента в порядке):

ThisWorkbook.Activate 
Sheets("MS Act Report").Select 
Range("G1").Select 
ActiveSheet.Paste 

это мой упрощенный код:

ThisWorkbook.Activate 
Sheets("MS Act Report").Range("G1").Select 
ActiveSheet.Paste  

При запуске этого я получаю

runtime error '1004': Select method of Range class failed

Answer 1

Вы можете выбирать диапазоны только для активных sh восточноевропейское время. Если «Отчет о MS Act» не является активным листом, вы не можете выдать команду .select для своих ячеек. Чтобы упростить код, вместо копирования, просто установите диапазоны равными.

Thisworkbook.WorkSheets("MS Act Report").Range("G1:I5").Value= _ 
    ActiveWorkbook.Worksheets("Whatever").Range("a1:c5").Value 

Некоторые рекомендуемые чтения: How to avoid using select