VBA講座 レッスン1(初級)【合計の計算】

合計の出し方 For文 の使い方


  • コマンドボタンを押すと下のコードが実行され集計が表示されます。
Private Sub CommandButton1_Click()

  '上の表 横の集計--------------
 ' j は 行、[6 To 9] 6行目から9行目
 ' i は 列 [2 To 4] 2列目から4列目

 For j = 6 To 9
   kei = 0
   For i = 2 To 4
     kei = kei + Cells(j, i)
   Next i
   Cells(j, 5) = kei ' 横の集計
 Next j

  '上の表 縦の集計--------------
 ' j は 列 [2 To 5] 2列目から5列目
  ' i は 行、[6 To 9] 6行目から9行目

 For j = 2 To 5
   kei = 0
   For i = 6 To 9
     kei = kei + Cells(i, j)
   Next i
   Cells(10, j) = kei
 Next j

End Sub




Excelの関数も同時に学べますよ。
数字~合計を入れるセルまで範囲選択し、sum関数(Σ)を押すと1ッ発で合計が表示されるよ

レッスン1 ダウンロードはこちら