Excelで月末の日付を取得するにはどうすればよいですか？

おそらく、月の終了日を取得するのは簡単かもしれませんが、Excelに複数の日付データがある場合、どのようにして各月の最終日を一度にすべて迅速に取得できますか？ここで、Excelでこの問題を解決するためのいくつかの便利な方法を紹介します。

Excelで数式を使用して月末の日付を取得する

ExcelでVBAを使用して月末の日付を取得する

Excelで数式を使用して月末の日付を取得する

各月の最終日を見つけるために数式を使うのは、すべてのExcelユーザーにとって非常に簡単かもしれません。

日付データの隣のセルを選択し、この数式 =DATE(YEAR(A2),MONTH(A2)+1,0) （A2は月末の日付を取得したいセル）を入力し、キーボードのEnterキーを押して、オートフィルハンドルを必要な範囲までドラッグします。これで、各月の最終日がセルに表示されます。スクリーンショットをご覧ください：

また、この数式 =EOMONTH(A2,0) を使用して、月の最終日を取得することもできます。（この数式を入力する前に、結果セルを日付形式に書式設定する必要があります。）

ヒント: Excel 2003またはそれ以前のバージョンでは、数式 =EOMONTH(A2,0) を使用したい場合、まずツール > アドインをクリックして「分析ツール」をインストールする必要があります。スクリーンショットをご覧ください：

Excelで定義された関数を使用して月末の日付を取得する

VBAに精通している場合、以下のVBAコードを使用して月の最終日を見つけることができます。

1. キーボードでF11 + Altキーを同時に押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. 次に、挿入 > モジュールをクリックして新しいモジュールウィンドウを挿入します。そして、次のVBAコードをそのウィンドウにコピーします。

VBA: 月末の日付を取得する

Function LastDayInMonth(Optional pDate As Date = 0) As Date
'Updateby20140723
If pDate = 0 Then pDate = VBA.Date
LastDayInMonth = VBA.DateSerial(VBA.Year(pDate), VBA.Month(pDate) + 1, 0)
End Function

3. ウィンドウを保存して閉じます。次に、セルを選択し、この数式 =LastDayInMonth(A2)（A2には、月末の日付を取得したい日付が含まれています）を入力し、Enterキーを押すと、月の最終日が取得されます。

注意: このVBAでも、=LastDayInMonth(A2) の数式を入力する前に、結果セルを日付形式に書式設定する必要があります。

関連記事：

• Excelで月の最初/最後の平日を見つける