Excel立即窗口打印公式值

时间:2011-05-04 18:17:24

标签: excel vba excel-vba excel-formula

今天是我编写Excel宏的第一天,我被赋予了修改其他人的代码以添加新功能的任务。我学习Excel有一个立即窗口,我觉得非常有用。

我确实有一个问题,我无法在搜索的最后一小时找到答案。如果你看下面的图像,你会发现fstr是一个字符串变量。

Image

目前,fstr包含公式。如何打印出该公式的实际值而不是公式本身?

我尝试的一件事是fstr.xlPastValues,但它没有用。我通过在手动粘贴公式值时记录宏来获得这个想法。

1 个答案:

答案 0 :(得分:4)

您可以使用评估方法:

Sub Tester()
Dim sFormula As String
    sFormula = "=A1+A2"
    'evaluate in the context of the current worksheet
    '  adjust to suit...
    Debug.Print ActiveSheet.Evaluate(sFormula)
End Sub