食品メーカーや製薬会社など、さまざまな分野で使用されることが多い。 ジュリアン・デイト しかし、この日付書式は、従来の日付書式に慣れた人々には理解しがたいものであり、実用的ではありません。 グレゴリオ暦 この記事では、最も簡単な方法を紹介します。 7桁のユリウス暦を変換する まで カレンダー日付 において エクセル .

説明のために、サンプルデータセットを例に挙げて説明します。 例えば、次のデータセットは、以下のようなものを表しています。 製品 , 派遣日 において ほうはく ( ジュリアン・デイト )の形式を採用しています。

練習用ワークブックをダウンロードする

以下のワークブックをダウンロードし、ご自身で練習してください。

7桁のユリウス日付フォーマットの紹介

を使用する日付書式。 組合せ の 年 とのことです。 番号 の 日数 として、その年の初めから知られています。 ジュリアン・デイト フォーマットで表示されます。 7桁のジュリアン の日付形式は 第1回 4 の数字が参照されます。 年 とのことです。 ラスト3 の桁は 総数 の 日数 その年の初めから

Excelで7桁のユリウス暦日付からカレンダー日付に変換する3つの方法

1.ExcelのDATE関数、LEFT関数、RIGHT関数の組み合わせで7桁のユリウス暦日付からカレンダー日付に変換する

エクセル には多くの関数が用意されており、それらを使って様々な操作を行います。 このメソッドでは 日付 , 左 & ライト の機能です。 日付 関数が生成します。 グレゴリアン カレンダーの日付。 この関数の引数は次のとおりです。 年 , 月 そして 日 はそれぞれ 左 は，指定された文字数を先頭から生成する一方で ライト は、文字列の末尾から指定された文字数を生成する関数です。 したがって、以下の手順で ユリウス日付の変換 まで カレンダー日付 において エクセル .

STEPS

• まず、セルを選択します。 D5 と入力し、数式を入力します。

• 次に、 を押します。 入力 .

ここでは ライト 関数が返す 3 の末尾にある文字から C5 セルの値と 左 関数が返す 4 の文字が最初から入っています。 次に 日付 関数は，それらをカレンダーの日付形式に変換し，正確な日付を返します。

• 最後に オートフィル シリーズを埋めるためのツールです。

続きを読む: Excelで日付を日にちに変換する方法（7つの簡単な方法）

2.ExcelのDATE、MOD、INT関数を組み合わせて、7桁のユリウス日をカレンダー日付に変換する。

さらに、数式を作成するために 日付 , モデル & イント を変換するための関数です。 ジュリアン・デイト .を使用しています。 モデル は，除数で割ったときの余りを生成する関数です． イント は、最も近い整数の値を生成するために数値を丸める関数です。 そこで、以下の処理を学習してタスクを実行します。

STEPS

• まず、セルを選択します。 D5 .数式を入力します。

• 続いて、 を押します。 入力 .

があります。 日付 関数は，引数を 年 . 月 と 日 形式です。 イント 関数が生成します。 最も近い整数 後にして C5 が割り振られます。 1000 .そして、その モデル 関数が生成します。 残部 と C5 が再びそれで割られる 最も近い整数 の値を設定します。

• 最後に、残りを オートフィル .

続きを読む: エクセルで日付を月に変換する方法（簡単な6つの方法）

類似の読み物。

• Excelで日付をdd/mm/yyyy hh:mm:ss形式へ変換する方法
• Excelで月名から月の初日を取得する（3つの方法）
• エクセルで前月末日を取得する方法（3つの方法）
• CSVでExcelの日付の自動整形を停止する（3つの方法）
• Excelでデフォルトの日付形式を米国から英国に変更する方法（3つの方法）

3.Excelで7桁のユリウス日をカレンダー日付に変換するVBAを適用する

さらに ブイビーエー コードに変換する必要があるため、以下の手順に従ってください。 ユリウス日付の変換 まで カレンダー日付 .

STEPS

• 選択 ビジュアルベーシック から デベロッパー のタブをクリックします。

• その結果 ビジュアルベーシック のウィンドウがポップアップ表示されます。
• ここで モジュール の下に インサート タブで表示します。

• その結果 モジュール のウィンドウがポップアップ表示されます。
• その後、以下のコードをコピーして モジュール ウィンドウに表示されます。

 Function 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 

• その後 ビジュアルベーシック ウィンドウに表示されます。
• 次に、セルを選択します。 D5 .ここで、数式を入力します。

• その後 入力 .
• 最後に オートフィル ツールで残りを変換します。

続きを読む: Excel VBA：月の初日（3つのメソッド）

結論

今後は、以下のようになります。 7桁の変換 ジュリアン・デイト まで カレンダー日付 において エクセル また、他の方法があれば教えてください。 コメント、ご提案、お問い合わせは、以下のコメント欄からお願いします。