VBA-将单元格中的数据设置为要显示的日期

Question

可能是一个简单的问题，由于我仍然不完全了解如何使用excel中的不同“层”（与显示的内容相比，单元格中的实际数据是多少），我无法确定自己的数字。日期）

我的单元格中有以下数据

10/17/2014
10/18/2014
10/19/2014
10/20/2014

我运行了以下vba代码，希望重新格式化该数据：

Sheet1.Range("C2", "C1000").NumberFormat = "dd-mmm-yyyy"

这使我的数据显示为：

17-Oct-2014
18-Oct-2014
19-Oct-2014
20-Oct-2014

这实际上是我想要的。 唯一的问题是，如果我单击实际单元格的内部，则数据仍为10/18/2014格式。

现在，根据我的理解，“格式”只会改变数据的显示方式。 我似乎无法在线找到如何获取屏幕上显示的内容并将单元格的值更改为要显示的内容。 我认为这是一个“热门”问题，并反复询问，因此也许我的搜索技能刚刚起步而无法找到该文章。 任何帮助，将不胜感激。 谢谢。

我已经读过我可以使用“选择性粘贴”，但是这需要我格式化单元格，然后手动复制和粘贴值，这不是我想要的。 我希望可以在VBA内部完全实现此自动化。

Answer 1

尝试这个：

Sheet1.Range("C1:C1000").Value = Sheet1.Evaluate("""'"" & INDEX(TEXT(C1:C1000,""dd-mmm-yyyy""),)")

开头的'强制输出为文本。

您也可以这样进行：

Sheet1.Range("C1:C1000").NumberFormat = "@"
Sheet1.Range("C1:C1000").Value = Sheet1.Evaluate("INDEX(TEXT(C1:C1000,""dd-mmm-yyyy""),)")

这会将格式为日期的数字转换为看起来像日期的文本。 换句话说，如果对这些单元格有任何引用或数学公式，则需要将它们隐瞒为数字。