用它的可见值替换单元格值

Question

我有一个列表，Excel 将格式设置为日期。单元格显示以下内容（因此这是“可见”值）：

06-14
06-01
05-14
10-01
....

这些不是日期。但是，Excel 会保持这样的格式，因此第一个公式栏显示06/14/2020。我希望公式栏显示06-14（或者，从技术上讲，这也可以'06-14）。我不想在公式栏中显示日期。

我尝试过 VBA，但没有一个能做到：

Cells(1,1).Value = Cells(1,1).Text
Cells(1,1).Value = Cells(1,1).Value

它将日期保存在公式栏中。

将单元格的格式更改为 Text 只是将完整的日期编号放入单元格中，例如44138.

Answer 1

你已经很接近了，只要这样做：

Cells(1,1).Value = "'" & Cells(1,1).Text