excel 转换成VBA 代码 ：在入库或者出库一栏输入数据自动计算库存，请问如何用VBA代码来实现？

试试以下代码 Sub Worksheet_Change(ByVal Target As Range)If Target.Row > 1 And Target.Column > 4 And Target.Column < 7 Theni = Target.RowCells(i, 7) = Cells(i - 1, 7) + Cells(i, 5) - Cells(i, 6)End IfEnd Sub