Question

如何让Excel一个单元格里面输入计算式，在另一个单元格显示结果。

希望哪位大侠教我一下，用宏制作表格，其中有的用的IF（ISERROR(X),'''',X)计算的，可是我不会制作，希望你们能教我一下，谢谢！

Answer 1

这要用到宏表函数EVALUATE，请参照下面的内容进行学习。

选中该单元格---按下CTRL+F3----输入你要定义的名称比如 AAA -----引用位置处输入比如是: =EVALUATE(A1)
在要出计算值的单元格输入公式 =AAA

假设是要整列如此,如下图

B1中输入 =AAA 下拉就能实现了

Answer 2

这要用到宏表函数EVALUATE，请参照下面的内容进行学习。

选中该单元格---按下CTRL+F3----输入你要定义的名称比如 AAA -----引用位置处输入比如是: =EVALUATE(A1)

在要出计算值的单元格输入公式 =AAA

假设是要整列如此,如下图

B1中输入  =AAA  下拉就能实现了

Answer 3

下面的例子“另一个单元格”为计算式右边一格：
选中单元格B1，同时按Ctrl和F3进入名称编辑器，新建，名称处输入 abc，下面引用位置处输入 =EVALUATE(A1)
确定。（因为选中B1，公式里是A1，即“右边一格”，希望你明白）

在任意计算式右边一格输入 =abc
就可以了。

Answer 4

两种做法：
正向做，输入完公式，前面加一个 '，就会显示公式
在后一个单元格显示数值就需要配合VBA
代码放到Sheet1中的VBE中
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
Set rng = Sheet1.Range("A1")
If Not Application.Intersect(Target, rng) Is Nothing Then
Range("B1").Value = Application.Evaluate(Range("A1").Value)
End If
End Sub

反向做法：

在后一个单元格写公式，在前一个单元格提取后一个单元格的公式
提取公式可以使用VBA函数，代码放在模块中
Function Hasf(rng As Range)
If rng.HasFormula Then
Hasf = rng.Formula
Else
Hasf = ""
End If
End Function

或者用宏表函数：定位到B1，Ctrl+F3定义一个名称 公式
引用位置写为 =Get.Cell(6,B1)
然后在前一个单元格A1写入 =公式

Answer 5

比如 a1单元格 为 3，b1单元格为7，在C1单元格中输入 =a1&"*"&b1&"="&a1*b1
C1中显示的就是 3*7=21
不知道是否你要的
还有就是上面提的用vba。VBA的单元格事件