Jak převést 7místné juliánské datum na kalendářní datum v aplikaci Excel (3 způsoby)

  • Sdílet Toto
Hugh West

Výrobci potravin, farmaceutické společnosti a různá další odvětví často využívají tzv. Juliánské datum Tento formát data je však v dnešní době nepraktický. Lidé mu těžko rozumějí, protože jsou zvyklí na Gregoriánský kalendář V tomto článku vám ukážeme nejjednodušší způsoby, jak. Převést 7místné juliánské datum na Datum kalendáře na adrese Excel .

Pro ilustraci použijeme jako příklad ukázkový soubor dat. Následující soubor dat představuje např. Produkt , Datum odeslání na adrese JLD ( Juliánské datum ) formátu společnosti.

Stáhnout cvičebnici

Stáhněte si následující pracovní sešit a procvičujte sami.

Převést 7místné juliánské datum.xlsm

Úvod do 7místného juliánského formátu data

Formát data, který používá Kombinace o Rok a Číslo z Dny od začátku tohoto roku je známý jako Juliánské datum formát. V 7 číslic Julian formát data,. První 4 číslice odkazují na Rok a Poslední 3 číslice jsou Celkový počet z Dny od začátku roku.

3 způsoby převodu 7místného juliánského data na kalendářní datum v aplikaci Excel

1. Převod 7místného juliánského data na kalendářní datum pomocí kombinace funkcí DATE, LEFT & amp; RIGHT v aplikaci Excel

Excel poskytuje mnoho funkcí a my je používáme k provádění mnoha operací. V této metodě použijeme funkci DATUM , LEVÝ & PRAVÁ funkce. DATUM funkce generuje Gregoriánský jazyk kalendářní datum. Mezi argumenty funkce patří Rok , Měsíc a Den resp. LEVÝ generuje zadaný počet znaků od začátku, zatímco funkce The PRAVÁ Funkce generuje zadaný počet znaků z konce řetězce. Proto postupujte podle níže uvedených kroků, abyste Převést Juliánské datum na Datum kalendáře na adrese Excel .

KROKY:

  • Nejprve vyberte buňku D5 a zadejte vzorec:
=DATE(LEFT(C5,4),1,RIGHT(C5,3))

  • Pak stiskněte tlačítko Vstupte na .

Zde se PRAVÁ funkce vrací 3 znaků od konce C5 hodnota buňky a LEVÝ funkce vrací 4 znaky od začátku. Dále DATUM funkce je převede na formát kalendářního data a vrátí přesné datum.

  • Nakonec použijte Automatické vyplňování nástroj pro vyplnění série.

Další informace: Jak převést datum na den v aplikaci Excel (7 rychlých způsobů)

2. Kombinace funkcí Excel DATE, MOD & amp; INT pro převod 7místného juliánského data na kalendářní datum

Kromě toho můžeme vytvořit vzorec s příkazem DATUM , MOD & INT funkce pro převod Juliánské datum . Používáme MOD funkce pro generování zbytku, když dělitel dělí číslo. INT Funkce zaokrouhluje číslo tak, aby se vygenerovala nejbližší celočíselná hodnota. Naučte se tedy níže uvedený postup, jak tuto úlohu provést.

KROKY:

  • Za prvé, Vyberte buňku D5 . Zadejte vzorec:
=DATE(INT(C5/10^3),1,MOD(C5,INT(C5/10^3)))

  • Následně stiskněte Vstupte na .

Na stránkách DATUM funkce převede argumenty na Rok . Měsíc a Den formát. INT funkce generuje Nejbližší celé číslo hodnotu po C5 se dělí 1000 . A MOD funkce generuje Zbytek když C5 se opět dělí tímto Nejbližší celé číslo hodnotu.

  • Nakonec doplňte zbytek pomocí Automatické vyplňování .

Další informace: Jak převést datum na měsíc v aplikaci Excel (6 snadných metod)

Podobné čtení:

  • Jak převést datum do formátu dd/mm/rrrr hh:mm:ss v aplikaci Excel
  • Získání prvního dne měsíce z názvu měsíce v aplikaci Excel (3 způsoby)
  • Jak získat poslední den předchozího měsíce v aplikaci Excel (3 metody)
  • Zastavení automatického formátování dat v CSV v aplikaci Excel (3 metody)
  • Jak změnit výchozí formát data z amerického na britský v aplikaci Excel (3 způsoby)

3. Použití VBA pro převod 7místného juliánského data na kalendářní datum v aplikaci Excel

Kromě toho můžeme použít VBA Proto postupujte podle níže uvedeného postupu a proveďte převod. Převést Juliánské datum na Datum kalendáře .

KROKY:

  • Vyberte Visual Basic z Vývojář nejprve na kartě.

  • V důsledku toho se Visual Basic vyskočí okno.
  • Nyní vyberte Modul pod Vložte tab.

  • V důsledku toho se Modul vyskočí okno.
  • Poté zkopírujte následující kód a vložte jej do pole Modul okno.
 Funkce JLDtoCD(JLD As String) As Long Dim Year As Integer Dim Day As Integer Dim CD As Long Year = CInt(Left(JLD, 4)) Day = CInt(Right(JLD, 3)) CD = DateSerial(Year, 1, Day) JLDtoCD = CD End Function 

  • Potom zavřete Visual Basic okno.
  • Dále vyberte buňku D5 . Zde zadejte vzorec:
=JLDtoCD(C5)

  • Poté stiskněte tlačítko Vstupte na .
  • Nakonec použijte Automatické vyplňování nástroj pro konverzi zbytku.

Další informace: Excel VBA: První den měsíce (3 metody)

Závěr

Od nynějška budete moci Převést 7 číslic Juliánské datum na Datum kalendáře na adrese Excel s výše popsanými metodami. Používejte je i nadále a dejte nám vědět, pokud máte další způsoby, jak tento úkol provést. Nezapomeňte napsat komentáře, návrhy nebo dotazy, pokud nějaké máte, do níže uvedené části komentářů.

Hugh West je velmi zkušený školitel a analytik Excelu s více než 10 lety zkušeností v oboru. Má bakalářský titul v oboru Účetnictví a finance a magisterský titul v oboru Business Administration. Hugh má vášeň pro výuku a vyvinul jedinečný přístup k výuce, který lze snadno sledovat a pochopit. Jeho odborné znalosti Excelu pomohly tisícům studentů a profesionálů po celém světě zlepšit své dovednosti a vyniknout ve své kariéře. Prostřednictvím svého blogu Hugh sdílí své znalosti se světem a nabízí bezplatné výukové programy Excelu a online školení, které jednotlivcům a firmám pomohou dosáhnout jejich plného potenciálu.