如何在不改变公式的情况下改变单元格的值(显示文本)？

Question

我有这个VBA宏的问题.

Sub demoChangeText()
    Application.Range("B2").Value = "Overidden text"
End Sub

我的测试在这里.要运行此宏,请在Excel中打开它,按,然后Ctrl+F8选择demoChangeText.

结果,此宏更改单元格的值B2(显示给我们的文本),但清除其公式.我需要改变B2价值,但也需要保留公式.

所以我的问题是如何更改单元格的显示文本而不更改其公式？

UPDATE

我问这个问题,因为我正试图解决这个问题

Answer 1

我不确定这是否会有所帮助,因为要说明你的基本要求有点难以理解,但无论如何都要进行:

有几件事会影响单元格的显示:

1. 输入的值,如果它是常量
2. 计算的结果,如果是公式
3. 细胞的格式
4. 单元格的条件格式(如果有的话)

在提供的示例表中,您有一个公式,=ROW()&COLUMN()其返回字符串结果22

您可以通过应用单元格格式使其显示其他内容,
例如,格式0;0;0;Ov\e\r\ri\d\d\e\n t\ext将显示任何字符串值Overridden text

这可以通过VBA应用

Range("B2").NumberFormat = "0;0;0;Ov\e\r\ri\d\d\e\n t\ext\s"

要么

Range("B2").NumberFormat = "0;0;0;""Overridden texts"""