收藏
明明在E列,12到30存在大于3的值,但是系统就是不累加!'sub 求和 Dim I As Integer Dim h As Integer h = 0 For I = 12 To 30 h = I + h If Cells(5, I).Value > 3 Then ActiveCell.Value = Cells(I, 5).Value + Cells(h, 5).Value Else MsgBox "怎么还是错啊!" End If Next I End Sub
-
提问者： xhpdez | 提问时间： 2008-01-13 12:55:51 | 回复(0)
我来回答