Як перетворити серійний номер дати Excel у .NET DateTime?


Відповіді:


94

Де 39938 - це кількість днів з 01.01.1900?

У цьому випадку використовуйте функцію бібліотеки фреймворку 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);
}

В.Б.

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

[Оновлення]:
Хм ... Швидкий тест, який показує, що насправді два вихідні дні. Не впевнений, де різниця.

Гаразд: проблема вирішена зараз. Детальніше див. У коментарях.


3
Я думаю, ви отримаєте на 2 дні занадто багато з цим перетворенням, тобто дату епохи потрібно було б перенести назад у DateTime (1899, 12, 30). Це пов’язано з помилкою високосного року Excel, я припускаю.
Дірк Фолмар,

2
На жаль, усі інші були швидшими ;-) І так, помилка спочатку походить від Lotus, як пояснював Джоель: joelonsoftware.com/items/2006/06/16.html
Дірк Воллмар,

30
-1 для дублювання того, що вже вирішено в .NET Framework (DateTime.FromOADate).

4
Для отримання додаткової інформації про FromOADate див. Msdn.microsoft.com/en-us/library/…
JDB все ще пам’ятає Моніку

5
Хоча я погоджуюсь, що метод FROMOADate кращий, я все ж знайшов цю відповідь інформативною.
VoteCoffee

174

Я вважаю, що це простіше за допомогою методу FromOADate , наприклад:

DateTime dt = DateTime.FromOADate(39938);

Використання цього коду dt - "05/05/2009".


2
Це також обробляє дати зі значеннями часу (з плаваючою комою у базовому форматі даних), чого прийняте рішення не робить.
Дерек Сладжер,

@nullptr Однак, він має точність лише 1 мілісекунду. Ви можете отримати набагато більшу точність, якщо вам все одно. Дивіться мою відповідь в іншому місці .
Jeppe Stig Nielsen,

Для мого PowerShell peepz:[DateTime]::FromOADate($serialDate)
Каньйон Колоба

2

Для 39938 зробіть так: 39938 * 864000000000 + 599264352000000000

864000000000 представляє кількість кліщів за день 599264352000000000 представляє кількість кліщів з 0001 року до 1900 року


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;
}

Вирізати та вставити когось ще талантів ...

Ян Браун

Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.