条件分岐 If文(If…Then…Else ステートメント)
If…Then…Else ステートメントの使い方
If condition Then [ statements ][ Else else_statements ]
If condition Then
statements
[ ElseIf condition1 Then ]
[ else_if_statements1 ]
[ ElseIf condition2 Then ]
[ else_if_statements2 ]
[ ・・・・・ ]
[ Else ]
[ else_statements ]
End If
【項目の説明】
- condition ・・・ 真(True)か偽(False)を評価する条件式(数式・文字列式)を指定します。
- statements ・・・ condition が真(true)の場合に実行されます。
「ブロック形式」の場合は省略可、「単一行形式」の場合は必ず指定します。 - else_statements ・・・ Else 以前に定義されている条件がどれも真(True)でないときに実行されます。(省略可)
- conditon1(2) ・・・ 真(True)か偽(False)を評価する条件式(数式・文字列式)を指定します。(省略可)
- else_if_statements1(2) ・・・ condition1(2)が真(True)のときに実行されます。(省略可)
If…Then…Else ステートメント使用例
VBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 |
Sub Sample_if_statement_1() '単一行形式 Dim Number As Integer Number = 252 If Number > 100 Then MsgBox ("100より大きい") Else MsgBox ("100未満") End Sub Sub Sample_if_statement_2() 'ブロック形式 Dim Number As Integer Number = 125 If Number > 0 Then MsgBox Number & " は、正数です" ElseIf Number < 0 Then MsgBox Number & " は、負数です" Else MsgBox Number & " です" End If End Sub |
If…Then…Else ステートメントのマクロ実行例
Sub Sample_if_statement_1()の実行例
Sub Sample_if_statement_2()の実行例
関連記事
-
-
条件分岐(Select Case ステートメント)
Select Case ステートメントの使い方 【構文】 Select Case …
-
-
プロシージャを作成する( Sub, Function )
プロシージャを作成する プロシージャとは、実行時に 1 つの単位として処理される …
-
-
引数の参照渡し・値渡し( ByRef, ByVal )
引数の「参照渡し」と「値渡し」 「参照渡し」とはプロシージャに引数として変数を渡 …
-
-
プロシージャ内のサブルーチンへ移動(GoTo ステートメント)
GoTo ステートメント GoTo ステートメントは、指定したラベルのサブルーチ …
-
-
プロシージャを呼び出す(Call ステートメント)
プロシージャを呼び出す プロシージャ内から、別のプロシージャを呼び出すには、Ca …
-
-
省略可能な引数・デフォルト値を設定( Optional キーワード )
Optional キーワード Optional キーワードを使用するとプロシージ …
-
-
繰り返し処理(Do…Loop ステートメント)
Do…Loop ステートメントの使い方 【構文 1】 Do [ Wh …
-
-
変数やプロシージャのスコープ(適用範囲)
変数やプロシージャのスコープ(適用範囲) 【構文:変数の宣言】 { Dim | …
-
-
プロシージャ内のサブルーチンへ移動(GoSub…Return ステートメント)
GoSub…Return ステートメント GoSub ステートメント …
-
-
ユーザー定義型変数を使う(Type ステートメント)
Type ステートメントを使う Type ステートメントを使うと1つまたは複数の …