|
| Menuへ |
| VBA講座 セルの操作 |
Step 4 セルに計算式をセットする
|
| プログラムを入力する |
|
前回の、Private Sub CommandButton1_Click() と End Sub の間を変更してください

Private Sub CommandButton1_Click()
'セルB8に数値をセットします。
Range("B8").Value = 1856
'セルB8に数値をセットします。
Range("B9").Value = 200 '---------@
'相対参照でセルB10に計算式をセットします。
Range("B11").Formula = "=B8+B9" '---------A
'絶対参照でセルB12に計算式をセットします。
Range("B12").Formula = "=$B$8+$B$9" '---------B
Range("B13").Formula = "=B8*B9" '---------C
Range("B14").Formula = "=B8/B9"
End Sub
|
|
|
|
| プログラム説明 |
|
@までは前回と同じです。
|
|
A相対参照で計算式をセット |
|
|
相対参照はワークシートに直接入力する時と同じです。
計算式をセットする場合は、.Formula を付けます。
数値や文字の場合は、.Value を付けましたが、それの替わりです。
|
|
|
|
|
B絶対参照で計算式をセット |
|
|
|
Cその他の計算式をセット |
|
|
|
| 実行結果 |
|
Excel画面に戻り、コマンドボタンをクリックしてください。
・セルB8に数値 1856 がセットされています。
・セルB9に数値 200 がセットされています。
・セルB11に相対参照の足し算の結果が表示されています。
・セルB12に絶対参照の足し算の結果が表示されています。
・セルB13に掛け算の結果が表示されています。
・セルB14に割り算の結果が表示されています。
|
|
 |
|
|
|
|
Topへ
|
■このサイトの内容を利用して発生した、いかなる問題にも一切の責任は負いませんのでご了承下さい。■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します。
Copyright (c) 2006-2007 Excel-Excel! All rights reserved. |
|