Excel vba：配列内の配列、ネストされた配列、ギザギザの配列

Question

3つの配列を持ち、それぞれに3つの範囲があります。これらの配列を1つの配列に格納したい。私は、次やろう！と

Function test()   
      Dim a() As Range 
      Dim b() As Range 
      Dim c() As Range 
      a = getA(dataWorkbook) 'a(1)=Range(...), a(2)=Range(...), a(3)=Range(...) 
      b = getB(dataWorkbook) 
      c = getC(dataWorkbook) 

      Dim allArrays(1 To 3) As Range 
      ' allArrays(1) = a 
      ' allArrays(2) = b 
      ' allArrays(3) = c 

      test="HELLO" 
End Function 

しかし、私はallArrays割り当てと行のコメントを解除すると、関数は代わりに「HELLO」の値を返します。私は間違っているの？

Answer 1

ジャグ配列を作成するための最良の方法は、Variantを使用することです：

Dim allArrays As Variant 
ReDim allArrays(1 To 3) 
'rest of code will work as intended 

あなたはあなたのコードを簡素化し、ちょうどArray機能を使用することができます。この場合は

Dim allArrays As Variant 
allArrays = Array(a, b, c) 

もののallArrays意志1ベースではなく0ベースになります。