| 投稿日 | ： 2002/09/04(Wed) 15:37 |
| 投稿者 | ： MI |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Gridでの計算 |
計算の合計を下のように書いて、グリットで計算しました。
そして、Gridの.EditCellでセルをダブルクリックして数値変更して、
Enterキーによって変更したときに、合計を計算しなおしたい
のですが、どうもうまくいきません。
どうかよろしくお願いいたします。
For i = 2 To .Rows - 1
total = 0
For j = 6 To .Cols - 1
total = total + .Cell(flexcpText, i, j)
Next
.Cell(flexcpText, i, 5) = total
Next