我在代码中调试，我看到值的格式正确，它只是获取并设置了值，看起来像excel将数据作为datetime而不是普通字符串， 我尝试使用NumberFormat并将其格式化为其中的任何一个（@，text，number，general）并非1正在工作，任何帮助都会很棒
ActiveSheet.Range("D" & i).Value = arr(i, 4)
更新1 很抱歉不提arr，arr是多维数组，它存储我读取的列，我只是从excel获取值，并通过循环存储范围
答案 0 :(得分：1)
试试这个
ActiveSheet.Range("D1").Value = "'" & arr(1, 4)
答案 1 :(得分：0)
我找到了解决方案，虽然它看起来很愚蠢
我将格式更改为
.NumberFormat = "yyyy/mm/dd"
我得到了我想要的价值