「Excel VBA」for文で配列の値を取得するサンプル

書式
配列名「インデックス番号」
使用例

Sub getArrElement()
 
 '配列
  Dim cft(3) As Integer
  Dim result As Integer
  cft(0) = 11
  cft(1) = 22
  cft(2) = 33
  cft(3) = 44
  
  'forループ
  For i = 0 To 3
    result = result + cft(i)
  Next i
  
  '計算結果
  Range("A1") = result

End Sub

結果 110

Excel VBA

Posted by arkgame