バリアントに必要なオブジェクト

Question

次のサブラインのtableauScores(i - 1, j).Value = wsScores.Cells(2 + i * 3, j + 1).Value行に「オブジェクトが必要です」というエラー424があります。

この部分だけがあり、それ以外はありません。私はいつもこのようにバリアントを使用する理由、ベース0

Dim wsScores As Worksheet 
    Dim i As Integer, j As Integer 
    Dim tableauScores As Variant 

    Set wsScores = ThisWorkbook.Worksheets("Scores")   
    j = 0 

    ReDim tableauScores(1, 2) 

    If wsScores.Cells(2, 1).Value = "Thomas" Then   
     For i = 1 To 2 
      For j = 1 To 3 
       tableauScores(i - 1, j).Value = wsScores.Cells(2 + i * 3, j + 1).Value 
      Next j 
     Next i    
    End If 

End Sub 

に、私は得ることはありませんよ。

Answer 1

tableuScoresはVariant — Variant() —のアレイとして定義され、指定された配列要素が初期化されるまで、それはEmptyの値を有することになります。 ValueプロパティをEmptyと読み込むことは不可能です。

tableauScores(i - 1, j) = wsScores.Cells(2 + i * 3, j + 1).Value