如何将Excel序列号转换为.NET DateTime？

77

如何从Excel序列日期转换为.NET日期时间？

例如39938是05/05/2009。

.net excel datetime

— 大卫·巴萨拉布（David Basarab）
source

94

自1900年1月1日以来的天数是39938？

在这种情况下，请使用框架库函数DateTime.FromOADate()。
此函数封装所有细节，并进行边界检查。

对于其历史价值，这是一个可能的实现：

（C＃）

public static DateTime FromExcelSerialDate(int SerialDate)
{
    if (SerialDate > 59) SerialDate -= 1; //Excel/Lotus 2/29/1900 bug   
    return new DateTime(1899, 12, 31).AddDays(SerialDate);
}

VB

Public Shared Function FromExcelSerialDate(ByVal SerialDate As Integer) As DateTime
    If SerialDate > 59 Then SerialDate -= 1 ' Excel/Lotus 2/29/1900 bug
    Return New DateTime(1899, 12, 31).AddDays(SerialDate)
End Function

[更新]：
嗯...对此进行的快速测试显示实际上已经休息了两天。不知道区别在哪里。

好的：问题已解决。有关详细信息，请参见注释。

— 乔尔·科洪
source

3

我认为这种转换会使您的工作时间增加了2天，也就是说，纪元日期必须移回DateTime（1899，12，30）。这是由于我认为是Excel的leap年错误。

— Dirk Vollmar，09年

2

糟糕，其他所有人都快了；-)是的，该错误最初来自Lotus，如Joel所述：joelonsoftware.com/items/2006/06/16.html

— Dirk Vollmar 09年

29

-1，用于复制.NET Framework（DateTime.FromOADate）中已解决的问题。

4

有关FromOADate的更多信息，请参见msdn.microsoft.com/zh-cn/library/…–

— JDB仍记得Monica

5

尽管我同意FROMOADate方法更好，但我仍然认为此答案很有用。

— VoteCoffee

173

我发现使用FromOADate方法更简单，例如：

DateTime dt = DateTime.FromOADate(39938);

使用此代码dt是“ 05/05/2009”。

— 纳西·卡尔维特（NarcísCalvet）
source

2

这也可以处理带有时间值的日期（基础数据格式中的浮点数），而公认的解决方案则不能。

— Derek Slager 2010年

@nullptr但是，它的精度仅为1毫秒。如果您愿意的话，可以得到更高的精度。在其他地方查看我的答案。

— 杰普·斯蒂格·尼尔森

对于我的PowerShell窥视器：[DateTime]::FromOADate($serialDate)

— Kolob Canyon，

2

对于39938，请执行以下操作：39938 * 864000000000 + 599264352000000000

864000000000代表一天中的滴答数599264352000000000代表从0001年到1900年的滴答数

— 阿斯蒂斯·罗迪斯
source

1

void ExcelSerialDateToDMY(int nSerialDate, int &nDay, 
                          int &nMonth, int &nYear)
{
    // Excel/Lotus 123 have a bug with 29-02-1900. 1900 is not a
    // leap year, but Excel/Lotus 123 think it is...
    if (nSerialDate == 60)
    {
        nDay    = 29;
        nMonth    = 2;
        nYear    = 1900;

        return;
    }
    else if (nSerialDate < 60)
    {
        // Because of the 29-02-1900 bug, any serial date 
        // under 60 is one off... Compensate.
        nSerialDate++;
    }

    // Modified Julian to DMY calculation with an addition of 2415019
    int l = nSerialDate + 68569 + 2415019;
    int n = int(( 4 * l ) / 146097);
            l = l - int(( 146097 * n + 3 ) / 4);
    int i = int(( 4000 * ( l + 1 ) ) / 1461001);
        l = l - int(( 1461 * i ) / 4) + 31;
    int j = int(( 80 * l ) / 2447);
     nDay = l - int(( 2447 * j ) / 80);
        l = int(j / 11);
        nMonth = j + 2 - ( 12 * l );
    nYear = 100 * ( n - 49 ) + i + l;
}

剪切粘贴其他人的才华...

伊恩·布朗

— Zymotik
source