Excel单元格减法

【问题标题】：Excel cell wise substractionExcel单元格减法
【发布时间】：2016-02-10 19:09:33
【问题描述】：

我在 excel 中有一个工作表，我需要在其中执行减法，只有任一列包含值，结果应自动存储在每个单元格的单元格中。例如 强文本

**JobExpense Advance Balance

4500 100 4400

8000 4000 4000

9800 5000 4800**

将此视为我的工作表，当用户在 Advance 列中输入值时，我需要自动存储 Balance 列的内容。任何帮助都是可观的。公式，vbscipt 什么的。我已经尝试过公式，但是每当在列中使用公式时，它总是会显示零

【问题讨论】：

标签： excel vbscript vba

【解决方案1】：

下面的代码假设工作费用是A列，B列是Advance，C列是Balance。

当 ColumnB 单元格发生任何更改时，以下代码将起作用。

复制下面的代码并在工作表选项卡上右键单击并选择查看代码并粘贴它。

关闭 VBA 窗口（Alt+Q 关闭 VBA 窗口）并返回该工作表并检查。

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 2 Then
    Application.EnableEvents = False
        With Target
            .Offset(, 1).Value = Val(.Offset(, -1).Value) - Val(.Value)
        End With
    Application.EnableEvents = True
End If

End Sub

【讨论】：

非常感谢。我尝试了很多功能，但这是最好的。谢谢朋友