Excelで年が閏年かどうかを確認する方法は？

ある年が閏年であるかどうかを判断する方法をご存知ですか？Excelにはそれを直接確認する方法はありませんが、ユーザー定義関数や数式を作成してこの問題を解決することができます。

数式を使用して年が閏年かどうかを確認する

ユーザー定義関数を使用して年が閏年かどうかを確認する

数式を使用して年が閏年かどうかを確認する

ワークシートに年リストがあると仮定すると、次の長い数式を使用して、指定された年が閏年であるかどうかを判断できます。以下のように操作してください：

1. 年セルの隣にある空白セルに、次の数式を入力します：

=IF(OR(MOD(A2,400)=0,AND(MOD(A2,4)=0,MOD(A2,100)<>0)),"閏年", "閏年ではない"), (A2には適用したい年が含まれています。必要に応じて変更できます) スクリーンショットをご覧ください：

2. そして、この数式を含む範囲までフィルハンドルをドラッグすると、すべての年が閏年であるかどうかがチェックされます。

注釈: 関連セルが空白の場合でも、この数式は「閏年」と表示されます。

ユーザー定義関数を使用して年が閏年かどうかを確認する

ユーザー定義関数を作成して、その年が閏年であるかどうかを確認することもできます。以下の手順で完了できます：

1. ALT + F11キーを押したままにすると、Microsoft Visual Basic for Applicationsウィンドウが開きます。

2. 「 挿入」> 「モジュール」をクリックし、次のコードをモジュールウィンドウに貼り付けます。

VBAコード: 年が閏年であるか確認する

Function IsLeapYear(pYear As Integer) As Boolean
'Update 20140623
If (pYear Mod 4) = 0 And (pYear Mod 100) <> 0 Or ((pYear Mod 400) = 0) Then
   IsLeapYear = True
Else
   IsLeapYear = False
End If
End Function

3. その後、このコードを保存して閉じ、ワークシートに戻り、この数式を入力します： =isleapyear(A2)、スクリーンショットをご覧ください：

4. そして、この数式を含むセルまでフィルハンドルをドラッグすると、すべての年がチェックされます。「FALSE」は閏年ではないことを示し、「 TRUE」は閏年であることを示します。スクリーンショットをご覧ください：

関連記事：

Excelで最小公倍数または最大公約数を見つける