|
请教各位老师,如何将下面宏代码更为自动更新数据,(就是那种填入数据在需要计算单元格自动计算出结果,而不是要按执行宏那种),在此谢谢大家了
Sub jisuan()Dim i%
For i = 3 To Range("H65336").End(xlUp).Row
Cells(i, 11) = Cells(i, 9) + Cells(i, 10)
Cells(i, 13) = Cells(i, 9) + Cells(i, 12)
Cells(i, 14) = Cells(i, 12) - Cells(i, 10)
Next i
End Sub
|
|