TEL. 03-6912-4140

〒173-0012 東京都板橋区大和町12-15

Top > Software > ExcelVBAマクロ > If

If命令If Statment

説明

If命令は条件により処理を分岐させたい場合に使用する命令です。

文法

If 条件式 Then
  （条件が真の場合の処理）
[Else
  （条件が偽の場合の処理）]
End If
If 条件式1 Then
  （条件式1が真の場合の処理）
[Elseif If 条件式2 Then
  （条件式2が真の場合の処理）]
[Elseif If 条件式3 Then
  （条件式3が真の場合の処理）]
[Else
  （条件式3が偽の場合の処理）]
End If

条件式

If 左辺 [式] [右辺] Then
左辺 式 右辺
変数 等記号、不等号記号。省略可能です。 定数 または 変数
定数
関数
式に指定は以下の指定がある。
式の値 説明
= 左辺と右辺の値は等しい場合は結果が「真」になる。
> 左辺が右辺よりも大きい場合は結果が「真」になる。右辺、左辺が文字列でも大小比較は可能です。 ただし、文字列の場合は右側から比較します。
< 左辺が右辺よりも小さい場合は結果が「真」になる。右辺、左辺が文字列でも大小比較は可能です。 ただし、文字列の場合は右側から比較します。
>= 左辺が右辺よりも大きいまたは等しい場合は結果が「真」になる。右辺、左辺が文字列でも大小比較は可能です。 ただし、文字列の場合は右側から比較します。
<= 左辺が右辺よりも小さいまたは等しい場合は結果が「真」になる。右辺、左辺が文字列でも大小比較は可能です。 ただし、文字列の場合は右側から比較します。
<>
Not =		 左辺と右辺の値は等しくない場合は結果が「真」になる。
And 条件式1と条件式2を結合する式。条件式1と条件式2の両方を満たしている場合に「真」となる。
Or 条件式1と条件式2を結合する式。条件式1と条件式2のどちらか一方を満たしている場合に「真」となる。

サンプルコード

Dim sUhen As String
Dim nUhen As Integer
Dim dtUhen As Date
Dim bUhen As Boolean

Dim sSahen As String
Dim nSahen As Integer
Dim dtrSahen As Date

'条件1（文字列の比較）
sUhen = "1"
sSahen = "1"
If sUhen = sSahen Then
 MsgBox "条件1真"
Else
  MsgBox "条件1偽"
End If

'条件2（数値の比較）
nUhen = 100
nSahen = 101
If sUhen > sSahen Then
  MsgBox "条件2真"
Else
  MsgBox "条件2偽
"
End If

'条件3（数値の比較）
nUhen = 75
If nUhen > 80 Then
  MsgBox "Over80"
ElseIf nUhen > 60 Then
  MsgBox "Over60"
ElseIf nUhen > 40 Then
  MsgBox "Over40"
Else
  MsgBox "Under40"
End If