Excel: Скопируйте и вставьте несколько строк и столбцов с одного листа на другой

Question

Я хотел бы скопировать несколько строк из одного листа в другой, у меня есть данные, начинающиеся с одного листа в строке A2 и заканчивающиеся на A108850 и начинающиеся с столбца A2 и заканчивается на столбце I2, как я могу скопировать все эти данные в другой рабочий лист, где начинается строка с A4, а столбец начинается с A4 и заканчивается на I4.

Как я мог сделать это через некоторые макросы ?.

Спасибо.

Answer 1

Попробуйте эту

Worksheets("Sheet1").Range("A2:I108850").Copy Worksheets("Sheet2").Range("A4") 

Измените ссылку на диапазон и имя рабочего листа соответственно.

Answer 2

Copy & Paste является «дорогой» операция, тем больше диапазон, тем дороже операция

Если вы заинтересованы в только значения, вы можете попробовать это:

Worksheets("DestinationSheetName").Range("A2:I108850").Value = Worksheets("SourceSheetName").Range("A2:I108850").Value 

отредактировал после комментария OP

Если код в вашем последнем комментарии имеет одинаковую цель только вставки значений, затем измените второй оператор на следующее:

With Worksheets("Sheet1").Range("A2:I108850") '<--| reference the "source" range you want to paste values from 
     .Range("A4").Resize(.Rows.Count, .Columns.Count).Value = .Value '<--| resize "destination" range accordingly to "source" one and paste values into it 
    End With 

, конечно, вы должны проверить имена листов, чтобы быть действительными те, в настоящее время активной книги