プログラムを入力する
前回の、Private Sub CommandButton1_Click() と End Sub の間を変更してください
Private Sub CommandButton1_Click()
'セルC5に数値をセットします。
Sheet2.Range("C5").Value = 56
'セルC6に数値をセットします。
Sheet2.Range("C6").Value = 87
'セルC7にSUM関数をセットします。
Sheet2.Range("C7").Formula = "=SUM(C5:C6)"
'セルC8にIF関数をセットします。
Sheet2.Range("C8").Formula = "=IF(C5>C6,""大"",""小"")"
End Sub
プログラム説明
Sheet2.Range というように先頭にシート名を指定しています。
数値や関数ののセルへの指定方法はこれまでと同じです。
実行結果
Excel画面に戻り、コマンドボタンをクリックしてください。
・セルC5に数値 56 がセットされています。
・セルC6に数値 87 がセットされています。
・セルC7に合計 143 がセットされています。
・セルC8にIF関数の結果 ”小” がセットされています。