エクセル|セルの数値が偶数か奇数かを調べる

最近セルの数値が、偶数か奇数かを調べる方法の質問が続けてありました。
偶数か奇数を調べるには、数値を2で割り余りが0なら偶数で、1なら奇数です。
こんな時には、MOD演算子を使うと便利です。
MOD演算子は2つの数値の除算を行い、その剰余を返します。
つまり、割り算した余りを返してくれます。

下記のコードで確認してください。
変数Aの値が偶数か奇数を調べるコードです。
変数Aに5を入れているので、いろんな値に変えて確認してください。
 
Sub Test_1()
Dim A As Long
A = 5
If A Mod 2 = 0 Then
  MsgBox “偶数です”
Else
  MsgBox “奇数です”
End If
End Sub
 
by わだまさつか