技术支持
明明在E列,12到30存在大于3的值,但是系统就是不累加!回答(0条) 2008-01-13 12:55:51
问题描述：'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