|
| Menuへ |
| VBA講座 セルの操作 |
Step 5 セルに関数をセットする
|
| プログラムを入力する |
|
前回の、Private Sub CommandButton1_Click() と End Sub の間を変更してください
Private Sub CommandButton1_Click()
'セルB8に数値をセットします。
Range("B8").Value = 456
'セルB9に数値をセットします。
Range("B9").Value = 132
'セルB10にSUM関数をセットします。
Range("B10").Formula = "=SUM(B8:B9)" '---------①
'セルB11にMIN関数をセットします。
Range("B11").Formula = "=MIN(B8:B9)" '---------②
'セルB12にMAX関数をセットします。
Range("B12").Formula = "=MAX(B8:B9)" '---------③
'セルB13にAVERAGE関数をセットします。
Range("B13").Formula = "=AVERAGE(B8:B9)" '---------④
'セルB14にIF関数をセットします。
Range("B14").Formula = "=IF(B8>B9,""大"",""小"")" '---------⑤
End Sub
|
|
|
|
| プログラム説明 |
|
①SUM関数 ： B8とB9の合計をセットします。
|
|
②MIN関数 ： B8とB9の最小値セットします。
|
|
③MAX関数 ： B8とB9の最大値セットします。
|
|
④AVERAGE関数 ： B8とB9の平均値セットします。
|
|
⑤IF関数 ： B8とB9のを比較し大きければ”大”を小さければ”小”をセットします。
|
|
|
|
| 実行結果 |
|
Excel画面に戻り、コマンドボタンをクリックしてください。
・セルB10に合計 456 がセットされています。
・セルB11に最小値 132 がセットされています。
・セルB12に最大値 456 がセットされています。
・セルB13に平均値 294 がセットされています。
・セルB14にIF関数の結果 ”大” がセットされています。
|
|
 |
|
|
|
|
Topへ
|
■このサイトの内容を利用して発生した、いかなる問題にも一切の責任は負いませんのでご了承下さい。■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します。
Copyright (c) 2006-2007 Excel-Excel! All rights reserved. |
|