2つの日付間の日数、週数、月数、または年数をカウントするにはどうすればよいですか？

Excelで日付データを扱う場合、2つの指定された日付の間の正確な日数、週数、月数、または年数を決定する必要がよくあります。この計算は、プロジェクトのスケジュール、従業員の勤続年数分析、財務予測などで一般的に必要とされます。Excelはこれらの差を計算するために、直接的な数式、組み込み機能、高度なツールなど、いくつかの使いやすい方法を提供しており、それらによってプロセスを合理化したり自動化したりできます。このチュートリアルでは、日付の差を正確に計算するためのさまざまなアプローチに関するステップバイステップの指示を提供し、あなたのシナリオに最も適したソリューションを選択する手助けをします。

• 数式を使用して2つの日付間の日数をカウントする
• 数式を使用して2つの日付間の週数をカウントする
• 数式を使用して2つの日付間の月数をカウントする
• 数式を使用して2つの日付間の年数をカウントする
• 数式を使用して2つの日付間の年数、月数、および日数をカウントする
• 強力な機能を使用して、2つの日付間の日数、週数、月数、年数などのさまざまな差を計算する
• VBAマクロ：バッチ処理のために2つの日付間の日数、週数、月数、または年数の計算を自動化する

数式を使用して2つの日付間の日数をカウントする

2つの日付間の日数を計算することは、Excelで最も頻繁に行われる日付関連タスクの1つです。締め切りの追跡や期間の計算、累積期間の監視などを行う場合、Excelの数式を使えば、これらの計算を正確に行うことができます。

結果を表示したい空白セルに次のいずれかの数式を入力してください:

注: ここで、A2には開始日が含まれ、B2には終了日が含まれている必要があります。

2. 必要に応じて、フィルハンドルをドラッグして数式を他の行に適用します。該当するセルには開始日と終了日の間の日数が表示されます。

ヒントと注意点:

• 終了日が開始日より前の場合:
  • 数式 =B2 - A2 は負の数を返します。
  • 数式 =DATEDIF(A2, B2, "D") は #NUM! エラーを返します。
    そのため、入力した日付が正しいかどうかを必ず確認してください。
• DATEDIF関数は時間部分を無視し、完全な日数のみを計算します。
• 包括的な日数（開始日と終了日を含む）を計算するには、数式の最後に+1を加えます:
  例: =DATEDIF(A2, B2, "D") + 1 または =B2 - A2 + 1.

数式を使用して2つの日付間の週数をカウントする

2つの日付間の週数を決定することは、給与支払い期間、定期的なイベント、または学術スケジュールにとって重要です。Excelは以下の数式を使用してこの計算を簡単にします。このアプローチは基本的な週数計算に最適ですが、カレンダーに基づいた週数の計算には追加の調整が必要になる場合があります。

1. 空白セルに次のいずれかの数式を入力します:

注: これらの数式では、A2は開始日、B2は終了日です。

2. フィルハンドルをドラッグして必要な行に数式を適用します。結果は小数点以下も含む週数として表示されます。この方法は特に正確な週数を把握するのに役立ちますが、完全な週（整数）のみが必要な場合は、以下のヒントを参照してください。

追加の注意点: 特定の曜日（例: 常に月曜日に開始する）に合わせて週を調整する必要がある場合は、補助列またはWEEKNUM関数を使用してカスタマイズされた計算を行うことを検討してください。

数式を使用して2つの日付間の月数をカウントする

2つの日付間の月数を計算することは、ローンの期間、満期までの時間、またはプロジェクトのフェーズを追跡する場合に役立ちます。DATEDIF関数は、このような区間ベースの日付計算用に設計されています。

1. 結果を表示したいセルに次の数式を入力します:

注: 開始日にはA2を使用し、終了日にはB2を使用します。

2. 必要に応じてフィルハンドルを下にドラッグします。この数式は、指定された期間内の完全な月数のみを返します。

注意: DATEDIF関数は月を完全な単位として扱うため、明示的に求めない限り部分的な月はカウントされません。上記の組み合わせ数式のように。エラーを防ぐために、Excelが日付フィールドを有効な日付として認識できるように入力形式を調整してください。

数式を使用して2つの日付間の年数をカウントする

年次報告書、雇用記念日、または経過した完全な年数が重要な他のシナリオの場合、DATEDIF関数を使用してこれを効率的に計算できます。

1. 空白セルに次の数式を入力します:

注: 開始日にはA2を、終了日にはB2を参照します。

2. 必要なすべてのセルに数式を適用するためにフィルハンドルを使用します。この計算は、2つの日付間の完全な年数を返します。これは、勤続年数や特定の福利厚生の資格基準を迅速に判断するのに非常に役立ちます。

トラブルシューティング: 日付が実際のExcel日付ではなくテキストとしてフォーマットされている場合、数式はエラーを返すことがあります。必要に応じてDATEVALUEを使用して変換してください。

数式を使用して2つの日付間の年数、月数、および日数をカウントする

年齢計算や詳細な勤続年数レポートなどの詳細な内訳が必要な場合、DATEDIF関数を組み合わせることで、2つの日付間の年数、月数、および日数を表示することができます。

1. 次の数式をセルに挿入または貼り付けます:

注: 開始日にはA2を使用し、終了日にはB2を使用します。

2. 必要に応じて数式をドラッグします。このアプローチは、結合されたテキスト形式で差を計算および表示します（例: 「2年3ヶ月7日」）。

ヒント: この結果は、従業員の年齢、契約期間、またはフルブレークダウンが必要な顧客との関係を文書化する際に特に役立ちます。結果を別々のセルで必要とする場合は、数式を分割するか、ヘルパーカラムを使用します。

強力な機能を使用して2つの日付間の日数、週数、月数、年数などのさまざまな違いを計算する

数式の操作に慣れていない場合や、異なる単位（日数、週数、月数、年数、組み合わせ）をすばやく切り替えたい場合、Kutools for Excel は Date & Time Helper でこのプロセスを簡素化します。

Kutools for Excel のインストールが完了したら、以下の指示に従ってください:

1. 結果を表示するセルをクリックします。次に、Kutools >  数式ヘルパー > 日時ヘルパー に進みます:

2. 日時ヘルパーダイアログで:

• タイプの下にある「差分」オプションを選択します;
• 引数入力ボックスで開始日と終了日を選択します;
• 結果タイプを希望通りに設定します（年 + 月 + 週 + 日など）カスタム内訳を作成します。

3. 計算するにはOKをクリックします。必要であれば、フィルハンドルをドラッグして結果を拡張します。

今すぐ Kutools for Excel をダウンロードして無料トライアルを開始しましょう！

このソリューションは、混在したまたは特殊な日付計算を定期的に行う場合や、柔軟かつ効率的な数式不要のソリューションを望む場合に特に推奨されます。

VBAマクロ：2つの日付間の日数、週数、月数、または年数の計算を自動化する

大規模なデータを扱う場合や、複数行にわたる繰り返しの計算を自動化する必要があるユーザーにとって、VBAマクロを使用することで効率が向上します。このアプローチは、一度に多くの日付ペアを処理する必要がある場合や、数式をコピーするのが非現実的な場合に適しています。VBAを使用すると、定義された範囲全体で日数、週数、月数、または年数の差を計算でき、必要に応じて出力形式をカスタマイズすることも可能です。これは特に定期的なレポート作成やバッチ処理タスクに効果的です。

1. 開発 > Visual Basic に移動してVBAエディターを開きます。Microsoft Visual Basic for Applicationsウィンドウで、挿入 > モジュールをクリックします。その後、次のコードをモジュールにコピーして貼り付けます:

Sub CalculateDateDifferences()
    Dim WorkRng As Range
    Dim RowRng As Range
    Dim StartCol As Integer
    Dim EndCol As Integer
    Dim OutputCol As Integer
    Dim DiffType As String
    Dim xTitleId As String
    
    xTitleId = "KutoolsforExcel"
    On Error Resume Next
    
    Set WorkRng = Application.InputBox("Select the range of date pairs (two columns: Start and End Date)", xTitleId, Selection.Address, Type:=8)
    
    If WorkRng Is Nothing Then Exit Sub
    
    StartCol = WorkRng.Columns(1).Column
    EndCol = WorkRng.Columns(2).Column
    OutputCol = EndCol + 1
    
    DiffType = Application.InputBox("Enter difference type: D=Days, W=Weeks, M=Months, Y=Years", xTitleId, "D", Type:=2)
    
    For Each RowRng In WorkRng.Rows
        If IsDate(RowRng.Cells(1, 1)) And IsDate(RowRng.Cells(1, 2)) Then
            Select Case UCase(DiffType)
                Case "D"
                    RowRng.Cells(1, 3).Value = RowRng.Cells(1, 2).Value - RowRng.Cells(1, 1).Value
                Case "W"
                    RowRng.Cells(1, 3).Value = (RowRng.Cells(1, 2).Value - RowRng.Cells(1, 1).Value) / 7
                Case "M"
                    RowRng.Cells(1, 3).Value = DateDiff("m", RowRng.Cells(1, 1).Value, RowRng.Cells(1, 2).Value)
                Case "Y"
                    RowRng.Cells(1, 3).Value = DateDiff("yyyy", RowRng.Cells(1, 1).Value, RowRng.Cells(1, 2).Value)
                Case Else
                    RowRng.Cells(1, 3).Value = "Invalid Type"
            End Select
        Else
            RowRng.Cells(1, 3).Value = "Invalid date(s)"
        End If
    Next
    
    Application.DisplayAlerts = True
    MsgBox "Date differences calculated in the third column of your selected range.", vbInformation, xTitleId
End Sub

2をクリックします ボタンを押してマクロを実行します。開始日と終了日（隣接する2列）を持つ範囲を選択するよう求められます。その後、差分タイプを入力します：Dは日、Wは週、Mは月、Yは年です。結果は選択した範囲の右隣の列に表示されます。

使用に関するヒント: このマクロは、高速で一貫性のあるバッチ処理に理想的です。エラーを避けるために、日付列が正しく日付としてフォーマットされていることを確認してください。結果列に「無効な日付」が表示される場合は、非日付値または空のセルがないか範囲を見直してください。この方法は、高度なユーザーや定期的な大量レポート作成のシナリオに適しています。

日付と時刻に関連したその他の記事: