Копировать строки из одной вкладки в другую в Excel 2003 - PullRequest
0 голосов
/ 23 декабря 2010

Как я могу кодировать макрос для копирования 43 строк за раз в другую вкладку для обработки и циклически проходить процедуру для строк от 1 до 4300 (столбцы A-P)? Обработка, выполняемая с каждым вставленным диапазоном, заключается в выполнении вычислений на основе вставленных ячеек и получении результатов в добавленной таблице с помощью другого макроса. Я использую MS Excel 2003.

1 Ответ

1 голос
/ 23 декабря 2010

Следующий код вставит данные из Листа 1 в блоках по 43 строки в Лист2, например, A1: P43, A44: A86 и т. Д.

Sub CopyData()
    Dim iRow As Long
    Dim rng As Range

    For iRow = 1 To 4258 Step 43
        Set rng = Range("A" & iRow & ":P" & (iRow + 42))
        rng.Copy Destination:=Worksheets("Sheet2").Range("A1") //Copy into A1:P43 on Sheet2
        //Call your existing Macro here to process data?
    Next
End Sub
...