前話問題
実行ボタンを押すと、
となり、消去ボタンを押すと、と戻るマクロ解答例Private Sub CommandButton1_Click()
Dim w As Integer, i As Byte
w = 0
For i = 1 To 10
w = w + Cells(5 + i, 3)
Next
Cells(16, 3) = w
End Sub
Private Sub CommandButton2_Click()
Cells(16, 3).Select
Selection.ClearContents
Cells(1, 1).Select
End Sub
では次の課題は、
実行ボタンを押すと次のように出席番号が発生して、
合計も計算されるように変更してください。
順番は、出席番号の発生→合計の計算です。
そして、消去ボタンを押すと、
と戻るようにしてください。第６話へ 第８話へ
vc++講義へ
