ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

条件分岐(Select Case ステートメント)

   

Select Case ステートメントの使い方


【構文】

Select Case form

  [ Case value1
    [ statements1 ] ]

  [ Case value2
    [ statements2 ] ]

  [ ・・・・・ ]

  [ Case Default
    [ default_statements ] ]

  [ Case Else
    [ else_statements ] ]

End Select

【項目の説明】

  • form  ・・・  条件式(数式または文字列式)
  • value1(2)  ・・・  次の形式で指定(省略可。ただしCase節がある場合は必須)
    (1)【値】
    (2)【値】To【値】
    (3) Is【比較演算子】【値】
  • statements1(2)  ・・・  formvalue1(2) と一致したとき statements1(2) が実行されます(省略可)。
  • default_statements  ・・・  form が Empty値(初期化されていない値)のとき、default_statements が実行されます(省略可)。
  • else_statements  ・・・  form が Case 節のいずれとも一致しないとき else_statements が実行されます(省略可)。


キーワード ToIs は、値の範囲を指定するキーワードです。
※ この Is は、比較演算子の Is とは別物です。

To を使って値の範囲を指定するときは、小さい方の値を先(左側)に指定します。

ここで使用できる比較演算子の種類には、より小さい(<)、以下(<=)、より大きい(>)、以上(>=)、等しくない(<>)、等しい(=) があります。
等価演算子(Is)と文字列比較演算子(Like)は使用できません。

Case 節には複数の式や範囲を指定可能。その場合はカンマ(,)で区切ります。
(例)Case 1 To 10, 23, Is > 100



Select Case ステートメントの使用例

VBAソース


ソース実行結果

select case 文 例



 - 構文 , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

While_Wend ステートメント例
繰り返し処理(While…Wend ステートメント)

While…Wend ステートメントの使い方 【構文】 While …

for each next ステートメント例
繰り返し処理(For Each…Next ステートメント)

For Each…Next ステートメントの使い方 【構文】 For …

Do Until...Loopステートメント例
繰り返し処理(Do…Loop ステートメント)

Do…Loop ステートメントの使い方 【構文 1】 Do [ Wh …

setステートメント使用例 1
set ステートメントを使う

Set ステートメントを使う 【構文 1】 Dim objectvar [ As …

引数を可変にする( ParamArray )

ParamArray キーワード ParamArray キーワードを使用すると任 …

GoTo ステートメント01
プロシージャ内のサブルーチンへ移動(GoTo ステートメント)

GoTo ステートメント GoTo ステートメントは、指定したラベルのサブルーチ …

配列が引数のプロシージャ 例1
配列が引数のプロシージャを作成する

配列が引数のプロシージャを作成する 【構文】 { Sub | Function …

If文使用例その1
条件分岐 If文(If…Then…Else ステートメント)

If…Then…Else ステートメントの使い方 【構文 …

引数の参照渡し・値渡し( ByRef, ByVal )

引数の「参照渡し」と「値渡し」 「参照渡し」とはプロシージャに引数として変数を渡 …

変数やプロシージャのスコープ(適用範囲)

変数やプロシージャのスコープ(適用範囲) 【構文:変数の宣言】 { Dim | …