Команды Array и Split для создания двумерного массива

У меня возникли проблемы с заполнением массива с помощью команды разделения.

Текущая строка ниже

MyString = "Row1 Column1[~]Row1 Column2[~]Row1 Column3" & vbNewLine & _
"Row2 Column1[~]Row2 Column2[~]Row2 Column3" & vbNewLine & _
"Row3 Column1[~]Row3 Column2[~]Row3 Column3" & vbNewLine & _
"Row4 Column1[~]Row4 Column2[~]Row4 Column3"

У меня есть массив, который я хочу сделать многомерным. и хотел бы, чтобы каждый Row# Column# находился в правильной части массива в зависимости от его номера

Например

MyArray(1,1) = "Row1 Column1"
MyArray(2,1) = "Row2 Column1"
MyArray(3,1) = "Row3 Column1"
MyArray(4,1) = "Row4 Column1"

MyArray(1,2) = "Row1 Column2"
MyArray(2,2) = "Row2 Column2"
MyArray(3,2) = "Row3 Column2"
MyArray(4,2) = "Row4 Column2"

MyArray(1,3) = "Row1 Column3"
MyArray(2,3) = "Row2 Column3"
MyArray(3,3) = "Row3 Column3"
MyArray(4,3) = "Row4 Column3"

Теперь я понимаю, как заполнить одномерный массив с помощью команды разделения

MyArray = Split(MyString, vbNewLine)

Это будет означать

MyArray(1) = "Row1 Column1[~]Row1 Column2[~]Row1 Column3"
MyArray(2) = "Row2 Column1[~]Row2 Column2[~]Row2 Column3"
MyArray(3) = "Row3 Column1[~]Row3 Column2[~]Row3 Column3"
MyArray(4) = "Row4 Column1[~]Row4 Column2[~]Row4 Column3"

Но я не знаю, как использовать команду разделения для заполнения второго измерения

Возможно ли это, и если да, то как?
Если это невозможно, может ли кто-нибудь предложить, как на самом деле заполнить это?

5
задан Deanna 16 May 2012 в 10:04
поделиться