При работе с Excel VBA обычно манипулируют данными с помощью массивов. Иногда вам может потребоваться перенести данные из массива обратно в диапазон на вашем листе. В этой статье мы рассмотрим несколько методов эффективного решения этой задачи. Мы предоставим примеры кода для каждого метода, что позволит вам выбрать подход, который лучше всего соответствует вашим потребностям.

Метод 1: цикл по массиву
Один простой метод — пройтись по массиву и перенести каждый элемент в соответствующую ячейку диапазона. Вот пример:

Sub ArrayToRange_Loop()
    Dim myArray() As Variant
    myArray = Range("A1:A10").Value

    Dim rng As Range
    Set rng = Range("B1").Resize(UBound(myArray, 1), UBound(myArray, 2))

    Dim i As Long, j As Long
    For i = 1 To UBound(myArray, 1)
        For j = 1 To UBound(myArray, 2)
            rng.Cells(i, j).Value = myArray(i, j)
        Next j
    Next i
End Sub

Метод 2: использование функции Transpose
Функция Transposeпозволяет переключать строки и столбцы двумерного массива. Используя эту функцию, вы можете напрямую присвоить транспонированный массив диапазону. Вот пример:

Sub ArrayToRange_Transpose()
    Dim myArray() As Variant
    myArray = Range("A1:B10").Value

    Dim rng As Range
    Set rng = Range("C1").Resize(UBound(myArray, 2), UBound(myArray, 1))

    rng.Value = WorksheetFunction.Transpose(myArray)
End Sub

Метод 3: использование функции Index
Функция Indexможет использоваться для создания динамического диапазона, соответствующего размеру вашего массива. Назначив массив непосредственно этому диапазону, вы можете эффективно передавать данные. Вот пример:

Sub ArrayToRange_Index()
    Dim myArray() As Variant
    myArray = Range("A1:C10").Value

    Dim rng As Range
    Set rng = Range("D1").Resize(UBound(myArray, 1), UBound(myArray, 2))

    rng.Value = myArray
End Sub

В этой статье мы рассмотрели три различных метода переноса массивов Excel VBA в диапазоны. Метод цикла подходит для небольших массивов, а функции Transposeи Indexпредлагают более эффективные подходы для больших массивов. В зависимости от размера и структуры ваших данных вы можете выбрать метод, который лучше всего соответствует вашим требованиям.