如何在EXCEl中把数字变成日期格式

如何在EXCEl中把数字变成日期格式

你这样，例如这个20051125在A1单元格，你在B1输入如下公式：=DATE(LEFT(A1,4),MID(A1,5,2),MID(A1,7,2))

然后把B1设成日期型就好了，

如果必须在A1显示这个2002年11月25日，那你就选择B1－>复制－>选择A1->按右键－>选择性粘贴－>选数值－>然后确定，A1设定成日期格式就好了，

注意：必须保证你输入的数字为8为，也就是月份和日期都是两位，2005年1月1日，你要写成20050101。

解释：

EXCEL的日期是从1900-1-1开始计算的，其实日期就是一个从1900-1-1开始的一个天数，比如你在一个单元格输入365，然后设定为日期型，所出现的日期就是1900-12-30，如果是364，那设定成日期型后就是1900-12-29.

如果你输入2008-12-2，然后设定为常规属性，则出现的是39784，这代表的是从1900-1-1日起后面的地39784天是2008-12-30日，也就是我先在答题的今天，明白了吧。显然你输入20051125这个数值是不能直接设定为日期行的，单元格会出现无数个#############2005年11月25日对应的天数的数字是38681

DATE()这个函数可以把数字转换成对应的年、月、日上的数字

假设原始数据在A列，替换结果在B列

Sub test()

For r = 2 To [A65536].End(xlUp).Row

t = Replace(Cells(r, 1), ".", "-")

If Cells(r, 1).NumberFormatLocal <> "G/通用格式" Then t = t & "0"

Cells(r, 2) = t

Next

End Sub