Как скопировать данные из другой рабочей книги (Excel)?

Я не думаю, что необходимо выбрать что-либо вообще. Я открыл две пустых рабочих книги Book1 и Book2, поместил значение "A" в Диапазон ("A1") Sheet1 в Book2 и отправил следующий код в непосредственном окне -

Рабочие книги (2).Worksheets (1).Range ("A1").Copy рабочие книги (1).Worksheets (1).Range ("A1")

Диапазон ("A1") в Sheet1 Book1 теперь содержит "A".

Кроме того, учитывая тот факт, что в Вашем коде Вы пытаетесь скопировать от ActiveWorkbook до "myfile.xls", порядок, кажется, инвертируется, поскольку метод Копии должен быть применен к диапазону в ActiveWorkbook, и место назначения (аргумент функции Копии) должно быть соответствующим диапазоном в "myfile.xls".

Вы были бы рады сделать "мой file.xls" активным, если бы это не влияло на экран? Выключение экранного обновления является способом достигнуть этого, это также имеет повышения производительности (значительный при выполнении цикличного выполнения при передвижении рабочих листов / рабочие книги).

Команда, чтобы сделать это:

    Application.ScreenUpdating = False

Не забывайте возвращать его к True когда Ваши макросы закончены.