excel正常的日期格式转换为文本格式

Question

如题所述

Answer 1

假设数据在a列
如果可以在b列生成，可用函数=text(a1,"0-00-00")实现要求
如果要在本列中实现，运行
以下宏即可实现
sub
aa()
dim
ir&,
x&
dim
arr
ir
=
range("a65536").end(xlup).row
arr
=
range("a1:a"
&
ir).value
for
x
=
1
to
ubound(arr)
arr(x,
1)
=
format(arr(x,
1),
"0-00-00")
next
x
range("a1").resize(ubound(arr))
=
arr
end
sub

Answer 2

excel中能用来计算的日期格式有3类，一是单元格格式里提供的，二是在单元格格式中自定义的，三是用函数来生成的。
如果这个是你手动输入的2013.11.01，肯定是不能被用来计算的，简单的说，excel不认识他，不会把它当成是一个日期。