excel求两列的差

如何求D列的值为B列与A列的差
由于列数太多,最好不适用将鼠标放在单元格的右下角变成十字后向下拉的模式,最好能够无论在第几行输入时都能自动求出值

亲,是这个意思么?

打开你的Excel文件,按“Alt+F11”打开VBA编辑窗口,然后在左侧对应的Sheet上双击,右侧空白处粘贴下面的代码。关闭VBA窗口。

 

 

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Selection.Count = 1 And (Target.Column = 1 Or Target.Column = 2) Then
    Application.EnableEvents = False
    If IsNumeric(Range("A" & Target.Row)) And IsNumeric(Range("B" & Target.Row)) And _
      Range("A" & Target.Row) <> "" And Range("B" & Target.Row).Value <> "" Then _
    Range("D" & Target.Row).Value = Range("B" & Target.Row).Value - Range("A" & Target.Row) _
    .Value Else Range("D" & Target.Row).Value = ""
    Application.EnableEvents = True
End If
End Sub

温馨提示:答案为网友推荐,仅供参考
第1个回答  2014-12-10

根据你的要求,最好的办法是写代码:

按ALT+F11,输入如下代码:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <> 1 And Target.Column <> 2 Then Exit Sub
    Range("D" & Target.Row) = Range("B" & Target.Row) - Range("A" & Target.Row)
End Sub

第2个回答  2014-12-10
在D1单元格输入公式 = B1-A1
点击鼠标,选中D1单元格,然后拖到最下一行,按照shift键不放手,在最后一个单元格Dx上点击,就可以快速的选中这个列。将光标移动到上面的公式栏,然后按下组合键ctrl+enter
第3个回答  2014-12-10
不用下拉啊!直接将鼠标放在单元格的右下角变成十字后双击左键就好了!
第4个回答  2014-12-10
出入公式不用下拉 双击也可以跟下拉一样,不过你不要有空格的单元格...本回答被网友采纳
相似回答