指定した数値に対応する選択肢の値・数式を返す（Choose 関数）
Choose 関数 の使い方
Choose 関数は、指定されたインデックス値（１から利用可能な選択肢の数）に対応した値または数式を返します。
result = Choose ( index, choice-1 [, choice-2, … , choice-n ] )
引数・戻り値
- index ・・・ 採用するインデックス値（１から利用可能な選択肢の数までの範囲内の値）を指定します。
- choice-1, choice-2, … , choice-n ・・・ 各選択肢には、式・値を指定します。
- result ・・・ 引数 index が、i の場合、引数 choice-i の値（式）となります。
Choose 関数は、選択肢が１つだけ返されますが、評価はすべての選択肢に対して行われます。このため、評価すると 0 による除算エラーが発生する式が１つでも含まれている場合は、エラーとなります。
引数 index が、１未満の場合や、リストに含まれる選択肢の数を超える場合は、Choose 関数の戻り値は Null 値になります。
引数 index が整数でない場合は、最も近い整数に丸められてから評価されます。
Choose 関数 の使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Sub Sample_Choose1() Dim Kuji Kuji = Int(Rnd * 8) + 1 '1 から 8 までのランダムな整数を発生させます。 '1⇒大吉, 2⇒吉, 3⇒中吉, 4⇒小吉, 5⇒末吉, 6⇒凶, 7⇒大凶, 8⇒エラー MsgBox Choose(Kuji, "大吉", "吉", "中吉", "小吉", "末吉", "凶", "大凶") End Sub |
実行結果
Kuji = 1 ⇒「大吉」が表示される
実行結果
Kuji = 8 ⇒ 選択肢にないので、Choose 関数の戻り値は Null 値となる
関連記事
-
-
配列の添字の最小値を「1」に設定する
Option Base ステートメントを使用する 【書式】 Option Bas …
-
-
文字列：２つの文字列を比較する（StrComp 関数）
StrComp 関数の使い方 【書式】 result = StrComp ( s …
-
-
日付時刻：日付から曜日を取得（ Weekday 関数、WeekdayName 関数 ）
Weekday 関数（日付から曜日を表す数値を返す）の使い方 【書式】 week …
-
-
色の設定（ThemeColor プロパティ・TintAndShade プロパティ）
ThemeColor プロパティ・TintAndShade プロパティ テーマカ …
-
-
変数が配列かどうかをチェックする（ IsArray 関数 ）
IsArray 関数の使い方 【書式】 result = IsArray( va …
-
-
文字列：文字列変数の値を右詰めまたは左詰めにする（RSet ステートメント・LSet ステートメント）
RSet ステートメント・LSet ステートメント 【書式】 ＜ RSet ステ …
-
-
VBA の演算子（演算子の優先順位）
演算子の優先順位 演算子の優先順位とは、１つの式の中に演算子が複数ある場合、どの …
-
-
式を評価し、結果（真・偽）に応じた式・値を返す（IIf 関数）
IIf 関数 の使い方 IIf（アイイフ）関数は、式を評価してその結果（真・偽） …
-
-
文字列：定数（改行・タブ）
改行・タブの定数 これらの定数は、使用前に定義する必要はありません。コード中のど …
-
-
変数のデータ型・宣言（Dim ステートメント）
変数の宣言 一般的な方法 【書式】 Dim varname [ As type, …