2011-02-02 拆成 2011 02 02 分别放在3个单元格中
------解决方案--------------------------------------------------------
你自定义格式,yyyy-mm-dd 不就可以了.问题不就解决了吗
------解决方案--------------------------------------------------------
Dim str as string
Dim strArr() as string
str=Range("B4").Value
strArr=Split(str,"-")
再将strArr数组中的数据组合起来