excel单元格20171221的文本格式，用VBA转化为日期格式2017-12-21

单据日期收发类型20171221 经销商采购入库20171221 经销商采购入库

2025-03-07 05:11:50

推荐回答（2个）

回答1：

如果在一列直接按照日期分列：

选中这一列 --数据--分列 --下一步---下一步 --列数据格式选择日期，点完成即可

===============

代码:

Sub xxx()
  For i = 1 To [a65536].End(xlUp).Row
   Cells(i, 1) = CDate(Format(Cells(i, 1), "0000-00-00"))
  Next
End Sub

回答2：

两列在不同单元格的吧？哪用得上VBA……
单元格格式-数字-日期
区域：中阿特拉斯塔马塞特文
然后在类型里找。