excel自动生成结果

来源：百度知道 编辑：UC知道 时间：2024/05/16 17:06:29
在A列输入计算式 在B列自动的生成此计算式的结果。
比如在A1 输入1+1+1+1*2+2 B1 自动显示其结果

应该用一个什么公式？

只能写VBA程序了.
右键点击工作表名(标签)->查看代码->输入下面代码:
Dim i As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
If Not i Then
If Target(1).Value <> "" Then
i = True
Cells(Target.Row, Target.Column + 1).Value = "=" & Target(1).Value
' Cells(Target.Row, Target.Column + 1).Value = "=if(ISERR(" & Target(1).Value & "),""""," & Target(1).Value & ")"
End If
Else
i = False
End If
End Sub

在A1 输入1+1+1+1*2+2，在B1输入=1+1+1+1*2+2

不用上面那么麻烦吧！
直接在前面加个等号不就可以了嘛！

关注