输出:

输出:

换句话说,如果某个单元格(比如 A1)的值是=Date(),那么在单元格 A1 中我将看到日期,但是我希望 B1 的值是=FuncText(A1),那么我希望在单元格 B1 中看到“Date()”。

为了强调,我想看到文本“Date()”,即 B1 中以“)”结尾的六个字符。

答案1

B1单元格中写入=A1

所以你会看到A1单元格日期B1细胞也

根据您的信息更新:-

Function FuncText(fma As Range) 
    If fma.HasFormula Then 
        FuncText = fma.Formula 
    Else: FuncText = fma 
    End If 
End Function 

输出:

B1单元格,返回为"=日期()"

但如果你想要完全一样“日期()”然后使用下面的函数

Function FuncText(fma As Range)
    If fma.HasFormula Then
        FuncText = Mid(fma.Formula, 2, Len(fma.Formula))
    Else: FuncText = Mid(fma, 2, Len(fma))
    End If
End Function

答案2

快速又简单。您需要创建一个用户定义函数来执行此操作...但这是可行的:

http://dmcritchie.mvps.org/excel/formula.htm

相关内容