Как назначить одно измерение 2-мерного массива новому 1-мерному массиву в VBA

Мне нужно создать новый массив и назначить его another2darray (atsomeelement)

Пример

array1(0) = 1
array1(1) = 2

, а теперь

array2(0) = array1

и, следовательно,

array2(0)(0) = 1
array2(0)(1) = 2

Теперь я хотите создать новый массив и присвоить ему 1d из array2.

newarray = array2(0)

и, следовательно,

newarray(0) = 1
newarray(1) = 1

Я не могу сделать это в коде VBA.
Фрагмент кода, приведенный ниже, работает, если вы закомментируете последний раздел, в котором я пытаюсь присвоить array2 (1) arrayynew .

Function test()
    Dim array1(0 To 20) As String
    Dim array2(0 To 5) As Variant
    Dim count As Integer

    For count = 0 To UBound(array1)
     array1(count) = count
    Next count

    'now that array1 is filled i want to insert it into array2(1)
    array2(1) = array1

    ' test
    MsgBox (array2(1)(3))

    'now i want to create a new string array and assign it to array2(1)
    Dim arraynew(0 To 20) As String
    arraynew = array2(1)
    'this is what fails. 

End Function