Excel VBA | 定数を定義

Excel VBA VBA
スポンサーリンク


では、「Excel VBA:演算子の使い方」を、
初心者向けの解説付きサンプルコードを 3 部構成(算術/比較/論理)でわかりやすく紹介します。


1. 算術演算子の基本(+−×÷など)

説明

数値の計算をするための演算子です。セルに入っている数字を使って計算したり、結果を別セルに表示できます。

サンプルコード

Sub CalcOperators()
    Dim a As Integer, b As Integer

    a = 8
    b = 5

    '四則演算
    Range("A1").Value = "a + b = " & (a + b)   '13
    Range("A2").Value = "a - b = " & (a - b)   '3
    Range("A3").Value = "a * b = " & (a * b)   '40
    Range("A4").Value = "a / b = " & (a / b)   '1.6

    '整数除算と余り
    Range("A5").Value = "a \ b = " & (a \ b)   '1(小数点切り捨て)
    Range("A6").Value = "a Mod b = " & (a Mod b) '3(余り)

    'べき乗
    Range("A7").Value = "a ^ 2 = " & (a ^ 2)   '64
End Sub
VB

ポイント

  • / は小数まで計算、\ は整数部分だけ取得。
  • Mod は割った余りを返す。
  • Excel のセルに結果が順に表示されるので確認しやすい。

2. 比較演算子(=、<、>など)

説明

2つの値を比較して、「True(真)」または「False(偽)」を返します。
条件分岐(If文など)でよく使われます。

サンプルコード

Sub CompareOperators()
    Dim a As Integer, b As Integer

    a = 8
    b = 5

    Range("B1").Value = "a < b → " & (a < b)
    Range("B2").Value = "a <= b → " & (a <= b)
    Range("B3").Value = "a > b → " & (a > b)
    Range("B4").Value = "a >= b → " & (a >= b)
    Range("B5").Value = "a = b → " & (a = b)
    Range("B6").Value = "a <> b → " & (a <> b)
End Sub
VB

ポイント

  • 比較の結果は True または False。
  • <> は「等しくない」。
  • 比較の順番を間違えると常に False になることもあるので注意。

3. 論理演算子(And、Or、Not)

説明

複数の条件を組み合わせて判定を行う演算子です。

サンプルコード

Sub LogicalOperators()
    Dim a As Integer, b As Integer, c As Integer

    a = 8
    b = 5
    c = 3

    'And:両方の条件が True のときのみ True
    Range("C1").Value = "a > b And b > c → " & (a > b And b > c)

    'Or:どちらかが True なら True
    Range("C2").Value = "a > b Or b < c → " & (a > b Or b < c)

    'Not:条件を反転(True ⇔ False)
    Range("C3").Value = "Not (a > b) → " & (Not (a > b))
End Sub
VB

🧠ポイント

演算子意味Trueになる条件
And論理積両方がTrue
Or論理和どちらか一方がTrue
Not否定True→False に反転

学習用の練習手順

  1. Excelを開いて新規ブックを作成
  2. 開発タブ → Visual Basic を開く
  3. 「挿入 → 標準モジュール」を追加
  4. 上記3つの Sub をコピー&貼り付け
  5. 各 Sub を順番に実行(F5キー)して結果を確認

応用ヒント

  • 比較演算子と論理演算子を組み合わせると条件分岐に使える: If a > 0 And b > 0 Then MsgBox "両方とも正の数です" End If
  • 条件を複雑に書くときは括弧で区切ると読みやすくなる。
VBA
スポンサーリンク
シェアする
@lifehackerをフォローする
スポンサーリンク
タイトルとURLをコピーしました