我有一个数据集，其中包含文本形式的值，例如“2016 年 3 月”。
现在我编写了以下代码来在我的报告表中复制它：
DataFin.Range("E9:E9") = DateSerial(Year(Date), Month(Date), 0)
DataFin.Range("E9:E9").Text = Format(DateSerial(Year(Date), Month(Date), 0), "mmmm yyyy")
它具有正确的格式，但是当我单击单元格时，该值会显示“3/1/2016”而不是“2016 年 3 月”。
任何想法如何将基础值更改为“2016 年 3 月”
谢谢，
皮特
我想请求一些有关 Excel 宏的帮助。
我有一个充满数据的列，我想创建一个宏，当我运行它时，它会向该列中的每个单元格添加“1”，而不必在所有 300 个单元格中键入“1”。有什么建议么？谢谢您的帮助。